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The Fast BASIC Compiler 



A stunning show delighted the 
crowd at the Whisman Theater in 
Mountain View last night. Called 
BLITZ!, loaded and performed by 
Robert Skyles in a one-man virtuoso 
programming display, the show fea- 
tures the spectacular compiler for 
the COMMODORE 64. 

"... BASIC pro- The BLITZ! com 

■ . piler IS faster than 

grains ruiininQ PETSPEED,and 

up to 20 times ':s:Z':zio,e 

♦gctOf"" compiler that has 



Wimoc faster than any 
f III I ICO other Commodore 
compiler that has 

appeared to date. 

Shortly after Skyles took his seat 
and inserted BLITZ!, he had normal 
BASIC programs running up to 20 
times faster after he BLITZed them. 

The performer explained that 
BLITZ! translates the slow BASIC 



language into a much faster code, 
thus improving the performance of 
the BASIC routines. BLITZ! reads 
the entire BASIC program, decides 
which operations only have to run 
once, and compiles the operations. 
It then re-writes the program into 
its special P-code. 

Skyles also showed how BLITZ! 
adds security to your programs, 
because once a program has been 
compiled, it is not readable. That 
means protection is an automatic 
part of the re-writing. 

The highlight of the show was, for 
this reviewer, when BLITZ! compiled 
a string of BASIC programs such 
that one loaded the next. An im- 
pressed audience looked on as 
Skyles effortlessly passed informa- 
tion from one program to another. 



BLITZ! on disk for the Commodore 64 costs only $99.00. 

(You can also get one for the older PET CBMs on a special-order basis. 
It puts on quite a show!) 

oi,,,irxc> ci«^#-^;x> wr^^i^^ Available from your local 

Skyies Electric Works commodore 64 dealer or 

231E South Whisman Road ^all 1-800-227-9998. 

fl°, ^"v^o'i'^^l^^o ^ ^^^^^ ^L'rZ' ,s a trademark o. Skyles Elec.r.c Works. 

(415) 9d5-17j5 commodore is a trademark of commodore 



There are three ways to learn 6502 Assembly Language on your Apple Computer: 



Hard 



OTHER ASSEMBLERS 



Easy Easiest 
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This Month in 
IVIICRO 



This is a very special month for MICRO. It's been 
redesigned to make it easier to read and easier to 
use. The listings are being typeset in clearer, larger 
print, and they are now proofed by computer for 
typos before being published. 

The Staff believes that it has chosen features 
which will truly interest and excite serious 
computerists. However, to be certain of this, an 
extensive, in-depth Reader Survey has been included 
in this issue. The answers we receive will guide the 
future direction of MICRO'S editorial material; be 
certain that your opinions, your desires, your likes 
and dislikes are considered. Return the Survey (with 
additional comments if you like] and make MICRO 
the magazine that you want it to be. 

Featured This Month 

Random Number Generator — Based on seven 
years of research, this is one of the best RNG's you 
will ever find. Whether you want it for software 
development, games, gambling, computer 
simulation, scientific experimentation, or any of its 
myriad other uses, you will discover that it is in an 
understandable form which you can easily use in 
your own programs. 

Musical Notes — For the budding musician in each 
of us, a program that gives you control over a five 
octive range covering the entire treble, bass and alto 
clefs. With a 200 note table and rhythmic variations, 
this is far more than just a toy. It even offers the 
unusual option of changing notes if you don't quite 
get your masterpiece right the first time. 

Programming with Macros — For the advanced 
computerist who writes in Assembly Language, 
Macros can be the key to more efficient, cleaner, 
more easily debugged programs. They are a powerful 
tool in knowledgeable hands. 

Under the Commodore 64 ROM — Use the entire 
potential of your computer and free up your BASIC 
memory without sacrificing program messages. 
Here, at last, is a way to print messages to the screen 
(even full screens) using the 16K of RAM located 
under the BASIC and Kernal ROM chips. 



Sixteen Bit 68000 Supermicros — The 68000 is 
thought by many to be the 6502 of the '80s, the 
future of microcomputing. To keep you aware of the 
latest trends, two seasoned computerists share their 
views and insights into this relatively new chip 
family. Their thoughts may influence the directions 
that your own hardware and software planning take. 

Useful Math Functions — Save yourself time and 
mathematical aggrevation with this practical 
compilation of defined functions assembled into a 
very friendly program. Once entered, the math 
formulas are at your disposal as needed without the 
frustration of entering them again and again. 

Apple lie Guide and Atlas — A very special gift to 
our readers this month is the complete Apple He 
Supplement to our best selling book," What's 
Where in the Apple." This will bring earlier copies 
of the book up-to-date with the material included in 
the latest printing. For those who have not yet 
discovered the importance of this book for your 
programming efficiency, this will give you a chance 
to see the type of material available to you. (An 
order form may be found on the inside back cover, if 
you would like to own a complete copy.) 

Question Mark — For those who enjoy a good 
mystery, our staff has come up with something that 
may pique your curiosity. Test your computing 
knowledge and find the answer. 

Inside the CIA — No, we haven't gone political - 
just practical. In his ongoing 'Interface Clinic' 
series, Ralph Tenny examines a toggle mode of 
operation useful for output and input of multiple 
bytes of parallel data, and the advantages and 
methods of using the Shift Register. He also looks at 
ways to interface directly to a microprocessor bus 
without damaging the computer. 

Spotlight — Acorn, a new computer system widely 
used in Great Britain, but just coming into 
American markets, is studied in detail. Developed 
for education, this versatile, sophisticated system 
with its excellent color graphics and advanced sound 
should go far in hobbyist, home and business 
applications. 
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Dear Readers, 



As you read through this issue you will notice a few new 
things in Micro. While preserving the integrity and thrust 
of Micro, we are always working towards improving what 
we already have. To this end we have made some changes 
in the physical layout of the magazine to make reading 
Micro even easier and more enjoyable. You will notice 
that now we are typesetting our listings rather than taking 
them directly from the printer. This is in direct response 
to readers' comments on the legibility of listings. In 
addition to being typeset, the size of the actual type in the 
listings is slightly larger. (Hopefully this will help slow 
down the loss of your eyesight due to staring at too many 
computer screens for too many years.) We have also 
improved the layout of the articles to make reading easier. 

Now some of you may feel that these changes reflect a 
loss of the 'original' Micro. To the contrary, we are more 
committed than ever to bring you articles that are 
intelligent and thought provoking. As part of this 
commitment we have added to some articles a 'Key to 
Understanding.' Don't get your hopes up; this is not some 
magical method to 'knowledge.' Nor is it a leftover from 
'Secrets of the East.' Instead, it is our way of making more 
of our articles accessible to more readers. How often have 
you picked up a magazine and found that due to a lack of 
some assumed 'basics' an article was beyond your reach. If 
only you had a basic foundation you could then use the 
article. Or on the flip side, you come across an article 
which, although it has information you find interesting, is 
interspersed with Pablum explaining every other word. 
How many times have we read what a binary digit is? To 
help eliminate both of these problems we have taken out 
the basic information needed to understand an article and 
put it in a sidebox. This 'Key to Understanding' explains 
any terms or concepts that are necessary for intelligently 
reading the accompanying article. Those who are already 
familiar with the subject matter can go on to the article, 
being spared what for them would be repetitious. This tool 
will be used as is appropriate and necessary. In this issue 
you will find two articles that utilize this style - The 
Random Number Generator by Cem Kaner and John 
Vokey, and Programming with Macros by Patty 
Westerfield. 

And now you have an opportunity to outdo yourselves 
-yes, it's Survey Time. (Why aren't you jumping up and 
down?) Last year Micro readers proved their stuff with a 
return rate of over 20 percent! In the world of surveys this 
is fantastic. Now you can do it again; don't miss out - 
this is your big chance to help out your fellow man (i.e. 
the Micro staff and Micro readers). And it is faster, easier, 
and much more pleasant than giving blood, although some 
have likened it to pulling teeth. Seriously, we would 
greatly appreciate your taking a few minutes of your time 
to fill out the survey and return it to us. We will pay the 
postage and put in the time and expense necessary to 
tabulate it. Why? It is through the survey results that we 
can decide how best to serve you. Everyone could be 



waiting for an article on interfacing your computer to your 
pet dog, but unless you fill out the survey and tell us we 
will never know. In the past. Micro readers have shown 
their stuff by responding in numbers much better than 
usually projected for survey returns. We hope this year to 
do even better. Although we can't give out a lollipop for 
each survey returned, we can guarantee that your opinion 
and information count and will be responded to. 

In closing, I would like to reiterate that we feel we are 
here to serve you and not the other way aroun. Micro is 
not just a magazine, but rather a community of dedicated 
readers. We invite you to participate and come out and 
play - write a letter to the editor, submit articles, give us a 
call, or - if you find it's Friday night and your computer is 
down - fill out the survey. Thanks. 



7n^ J. /!^n^<^^ 



Mark S. Morano 
Technical Editor 
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Cover 
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Summer is here and music is in the air. Play the old 
favorites or compose a new tune to honor the 
season, with Musical Notes for the Apple. 
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^ NEC PRINTERS 

NEC 2050 "999.00 

NEC 3550 "1679.00 

PERCOM/TANDOM 
DISK DRIVES 

5'A" 320K Floppy "229.00 

5 Meg Hard w/Controller CALL 

10 Meg Hani WContraller CALL 

15 Meg Hard w/CortraHer CALL 

20 Meg Hard WCortroller CALL 

AMDEK 

310A Amber Moritor "169.00 

axY 100 Rotcer "599.00 

Color II "399.00 

AST RESEARCH 

Six Pak Rib.. .from "279.00 

Combo Rus II.. .from "279.00 

Mega Rus -from "309.00 

I/O Plus from "139.00 

QUADRAM 

Quadlink "479.00 

0iB<4)oard as low as "239.00 

Quad 512 Rus.-as low as "249.00 

QuadcaJor...as low as "219.X 

Chronograph "89.00 

Paratiel Interface Board '89 00 

B4K RAM Chips Kit "59.00 

MICRDPRD 

\AibrdStartMaillltergB "349.00 

InfoStar "299,00 

SpellStar "159.00 

CaicScar "99.00 

MICRDSTUF 

Crosstalk "105.00 

MICRDSDFT 

f/ultipian "159.00 

ASHTON-TATE 

dSASE II "389.00 

Friday! "185,00 

lUS 

EasyWnter « "249.00 

EasySpeller "119.00 

Easyfiler '229.00 

CDNTINENTAL SDFTWARE 

1st Oass Mal/Form Litter "79.00 

Hone Accountant Rus "88.00 



IBM 



VISICDRP 






IBM 


APPLE 


VisiCalc 




•159.00 


ViaCalc 4 


■159.00 




ViaCalc Advanced 




•269.00 


VisiWord/Spell 


'249.00 




VisitrendyRot 


"199.00 


"199.00 


ViaUnk 




•16900 


VisiRle 


'199.00 


"169.00 


ViaSchedule 


"199.00 


"199.00 


Visidex 




•159.00 


VisiRot 




•135.00 


VisiTerm 




■7500 


Desktop Ran 


"199.00 


•169.00 


Bus. Forecast Model 


•75.00 


"75.00 


StretchCalc 


■75,00 


"75.00 


VisiTutor Calc 


•59.00 


"5900 


VisiTutor Advanced 


"75.00 


"75.00 


WsiTutor 'Atard 


"259.00 


•5900 


Visi-On Calc 


'289.00 




Visi— On Graph 


'179 00 




Visi— On Word 


•275 00 




Visi— Dn Mouse. 


■159 00 




Visi-On Host 


■319 OC 

pfs 






IBM 


APPLE 


Wnte 


■89.00 


•79.00 


Graph 


■89.00 


•79.00 


Report 


"7900 


'79.00 


file 


•89.00 


"79.00 


Solutions': as tow as 


•16.00 


"16.00 




•Call Dn Tides 


MONDGRAM 




Dollars and Sense. 




•109 00 



LOTUS 

l-a-3 "399.00 

PROFESSIDNAL SOFTWARE 

PC Rus/The Boss "349.00 

SYNAPSE 

RIe Manager •89.00 

SOFTWARE ARTS 

TX Sdver "189.00 



AXIOM 

AT-IOO Atari Interface "239.00 

GP-100 ParaJlei Interface '199.00 

AT-a46 Interface •Bg.OO 

BMC 

401 Letter Quality '569.00 

0X-8a Dot Matnx "269.00 

CENTRONICS 

122 Parallel '299.00 



"19900 
•S49 00 



.'209.00 
.'379.00 
■599.00 
•569.00 
.'92900 
'999 OO 
1499.00 



739-1 Parallel 

739-3 Serial 

C.ITOH 

GonHa Banana 

Prcwnter"a510P 

Pruwnter 1550P 

A10 (18 ops) 

8600 P 

F10-40 

FlO-55 

COMREX 

ComWnter II Letter Quality '499.00 

DIABLO 

620 Letter Quality '949.00 

630 Letter Quality '1749 00 

DAISYWRITER 

2000 "99900 

Tractor Feed '109.00 

EPSON 

MX-BQR, MX-IOO, RX-BO. RX-HOfT, 
FX-BQ. FX-100 CALL 

IDS 

Prism aO ..For Configurations CALL 

Pnsm 32 For Configurapons CALL 

MANNESMAN TALLY 

160L '58900 

18QL '799.00 

Spint 80 '309.00 



PRINTERS 

NEC 

20W2O30 '899.00 

8023 Dot fylatrix '379.00 

6025 Dot Matnx '669.00 

3510 Serial/Letter Quality '1449.00 

3530 Parallel/Letter Quality '1499 00 

7710/7730 Seri*Parallel '1949.00 

OKIDATA 

62, 83, 84, 92, 93. 2350. 2410 CALL 

SMITH CORONA 

TP-2 "399,00 

Tractor Feed "119,00 

SILVER REED 

500 Letter Quality "469,00 

550 Letter Quality "699.00 

STAR 

Gemini 10X "299.00 

Gemmi P15X '399.00 

Deltaic '559.00 

Serial Board "75.00 

TOSHIBA 

1350 '1699.00 

TRANSTAR 

120P '499.00 

130P '689.00 

315 Color '499.00 

APPLE INTERFACE 
CARDS fi BUFFERS 
Choose from PKASD, Orange Mcro, MPC. 
MicroMax. Tymac. Quadram & Practical 
Peripherals. PRINTER CABLES 
are avalaUe for most aH computers on the 
market. We supply aH your computer needs. 

PAPER SUPPLIES 

1000 shts. 8)4x11 Tracttr Paper '19- 

1000 shts 14'/Sx11 Tractor Paper "24~ 

1 or 2" Address Labels "9"" 



MBC-550 CALL 

MBC-555 CALL 

MBC 1100 '1499.00 

FDD 3200-32aX Drive '389.00 

MBC 1150 "1899.00 

MBC 1200 "1849.00 

FDD 6400-B4aK Drive "469.00 

MBC 1250 "2099.D0 

PR 5500 Printer "599.QC 



^ SANYO 



APPLE/FRANKLIN 
DISK DRIVES 

MICRO-SCI 

A2 "219.D0 

A40 "299.D0 

A70 "319.00 

02 Controller "79.D0 

C47 Controller "89.00 

RANA 

Elite 1 "279.00 

Bite 2 "389. DO 

Bite 3 "569D0 

APPLE lie STARTER PACK 
64K Apple He. Disk Driw & ContrcKer. 80 Cdumn 

Card, Monitor II & DOS 3 3 
COMPLETE CALL 




ACE 1000 Cokir Computer T^~ CALL 

ACE Family Pack System CALL 

ACE PRO PLUS System CALL 

ACE 1200 Office Mgmt. System CALL 

'Not lie Expensive" 



TERMINALS 

914 

924 

925 

950 

970 

COMPUTERS 

Teleport Portable 

aOOA 

802 

803 

a02H 

806/20 

816/40 

1602 

1603 



"56900 
'689.00 
•739.00 
. ^929.00 
•103900 



CALL 

'1099.00 
'2699.00 
'194900 
'4695.00 
'4999.00 
'9199.00 
'3399D0 
CALL 



ftTelcVideo 




ANCHOR 

VAjIksmodem 

Mark IL 

Mark VII [Auco Ans./Auto Gial],,, 

Mark XII [1200 Baud] 

TRS-aO Cotar Computer 

9 \falt Power Supply 

HAYES 

Smartmodem 300 

Smarcmodem 1200 

Smarunodem 12008 

MiiTomodetn lie • -• . 

Micromodem 100 

Smart Com II 

Chronograph 



MODEMS 



. .'59.00 
..'79.00 

•119.00 
.'299.00 

.'99.00 
'900 



, '209.00 
..'49900 
,'449.00 
..'269.00 
..'299.00 
.. '89,00 
•199,00 



NOVATION 

J-Cat 

SmartCat 103 

Smartest 103/212 

AutoCat 

212 AutoCat 

/\pple Cat II 

212 Apple Cat 

Apple Cat 212 Upgrade 

Cat 

ZENITH 

ZTA 

ZT-10 

ZT-11 



,, "99 99 

, -17900 

■399 00 

,,•21900 

, '549 00 

,,■24900 

,,■569 00 

■303,00 

■139,99 

■339,00 

■309 00 

,,•369 00 



AMDEK 

300 Green 

300 /imtjer 

310 Amber 

Color 1 

Color 1 Rus 

Color 2 

Color 2 Rus 

Color 3 

Color 4 

BMC 

12" Green 

'i2' Green Hi-Res 

9131- 13" Color 

GORILLA 

12" Green 

12" Amber 

NEC 

JB 1260 Green 

J8 1201 Green 

JB 1205 Amber 

JC 1215 Color 

JC 1216 RGB 

JC 1460 Color 



MONITORS 



,■149,00 
,,"159,00 
,,■169 00 
,,■279,00 
-■29900 
,'399 00 
,,'41900 
•34900 
■699.00 

....■88.99 

.■119.99 

..■249.00 

. ..'66.99 
..'95,99 



PRINCETON GRAPHICS 



,'109,00 
,'149.99 
.'159.99 
'269.00 
.'429.00 
.'359.00 



SAKATA 

100 '269.00 

TAXAN 

210 Color RGB ■299.00 

400 Med-Res RGB ■Sig.OO 

415 Hi-Hes RGB ■439.00 

420 HI-Rbs RGB [IBM] "489.00 

100 12" Green "125 00 

105 12" Amber "135.00 

USI 

Pi 1. 9" Green "99 39 

Pi 2, 12" Graen "11999 

Pi 3. 12" Amber "149 99 

Pi 4. 9' Amber "139.93 

1400 Color "26999 

QUADRAM 

Quaddirome 8400 "549.00 

ZENITH 

ZVM 122 Amber "109.00 

ZVM 123 Green "8999 

ZVM 135 Color/RGB ■469 99 



east 
u 800-233-8950 

> ^ In PA call [717)327-9575,Dept 4051 5 
Order Status Number: 3S7-9S76 
Customer Service Number: 327-1450 
477 E. 3rd St., Williamsport, PA 17701 



Canada 

Ontario/Quebec 

800-268-3974 

Other Prawinces800-268-4559 

rn TarantD call (416]a2B-a866,Dapt 4Q5 
Ordar Status Number: 828-0866 
2505 Dunwin Drive, Unit 3B 
Mississauga, Ontario, Canada L5L1T1 



west 
800-648-3311 

In NV call (702]5Sa-5e54,Dept. 40515 

Order Status Number: 588-5654 

P.O.Box 6689 

Stateline, MV 89449 



No risk, no deposit on C.D.D. orders and no waiting period for certified checks or money orders. Add 3% [minimum *5] shipping and handling 
on all orders. Larger shipments may require additional charges. NV and PA residents add sales tax. All items subject to availability and 
price change. Call today for our catalog. 
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KOALA PADS 

Atari [Qsk) "75.00 

Atari [ROM] "82 00 

C-64 [Disk] '75-00 

C-64 [ROM] '82.00 

IBM -gS-OO 

Apple/Franlclin '85.00 



KOALA SOFTWARE CALL 



Qs. commodore 

CBM 8032 '599 

CBM 4032 •599 



MSO SD1 Disk Drive '343.00 

MSD SD2 Disk Dnve •599.00 

CBM 8096 '869.00 

CBM 9OO0 '999.00 

B12B-B0 '789-00 

8032 to 9000 Upgrade "269.00 

2031 LP Disk Drive "299.00 

8050 Disk Drive "949.00 

8250 Disk Dnve "1199.00 

4023 Pnnter "379. OC 

8023 Pnnter '589.00 

6400 Pnnter '1399.00 

Z— RAM '499.00 

aik:on Office "699.00 

The Manager "199.00 

SoftRDtWI "125 00 

WsiCaic "159. cm 

PROFESSIONAL 
SOFnVARE 

Wonj Pro 2 Plus '159 00 

Word Pro 3 Plus '18900 

WonJ Pro 4 Plus/5 Rus-.-each '279.00 

InfoPra '179.00 

ArtninisLrator '399.00 

Power "79.00 




SX-64 

PORTABLE 

«839 



VIC 20 CALL 

CBM 64 '199 

C1541 Disk Drive "249.00 

C1530 Datasette "69.00 

C1520 Cdor Printer/Rotter '129.00 

M-801 Dot fwtetrix Printer '21900 

CI 526 Dot Matri»/Serial "299.00 

CI 702 Color Monitor "249.00 

C1311 Joystick "4.99 

CI 31 a Paddles '11.99 

C1600 VIC Modem '59.00 

C1650 Auto Modem '89.00, 

Logo 64 '49.00 

Riot 64 '39.00 

Word Pro 64 Rus '59.00 

Parallel Pnnter Interface '49.00 

Gate Result 64 '65-00 

Caic Result Easy '39.00 

Codewnter 64 "75-00 

Quick Brown Rw "49 00 

MCS 801 Cdor Printer '499.00 

OPS 1101 Daisy Printer "459.00 

Mage Voice Speech Module "54.00 

Desk Organizer Lock "49.00 

Vidtex Telecommunications '34.95 



We stock a full Inventory of software for Commodore, such 
as: Artworx, Broderbund, Commercial Data, Creative Soft- 
ware, EPYX, HES, MicroSpec, Nufekop, Ronnox, Sirius, 
Synapse, Thorn EMI, Tronix, UMI, Victory, Spinnaker, Rain- 
bow S, Timeworks! 



INFOCOM 

Zork 1.2.3 (AT/AP/CBM/IBMJ '2900 

Dead™ [AT/AP/CBM/IBM] '32.95 

Enchanter (AT/AP/CBM/IBM) '32.95 

Rawtfoll (AT/AP/CBM/IBM) '32.95 

Witness (AT/AP/CBM/IBM) '32.95 

Starcross (AT/AP/CBM/IBM) '29.00 



PacMan 
Centipede 
Oig Dug 
Donkey Kong 
Defender 
Robotron 
Star Gate 



ATARISOFT 

IBM/AP 
"29.99 
"2999 
"2999 
"2999 
•29 99 
"29.99 
"29.99 



C64/VIC 
■37.99 
"37.99 
•37 99 
"37.99 
•37.99 
•37 99 
•37 99 



CMO'S PORTABLE CORNER 




HP 71B 
•499" 



41CV "isg" 

41CX •249"' 

HP IOC ^51 .99 

HP lie •sg.gg 

HP ISC '85.99 

HP 15C •BB 99 

HP 16C •BB.gg 

HP 75C ^749. 99 

HPIL Module ^98. 99 

HRL Cassette or Pnnter ^359. 99 

Card Reader •143.99 

Extended Function Module •63.99 

Time Module •63 99 

TIMEX/SINCLAIR 

Timex/Sinclair 1000 CALL 

Timex/Sinclarr 2086 CALL 

16K Memory "25 00 

2040 Mnter •99.99 

VuCalc ^17 99 

Mindware Pnnter ^99 99 




PC-8201 
'599 



NEC 

PC-B221A Thermal Pnnter ^149.99 

PC-a2aiA Data Recorder ^99 00 

PC-B201-Q6 8K RAM Chios •! 05.00 

PC-8206A 32K RAM Cartridge •329.00 




PC-1500A MBS" 

PC-1250A •88" 

CE-125 Pnnter/Cassette •126.99 

CE-150 Color Pnnter/Cassette .. ^171 99 

CE-155aKRAM •93 99 

CE-161 16K RAM '13499 

CE-500 ROM Ubrary '29.99 



m 






A 

ATARI 



HOME COMPUTERS 




WHILE SUPPLIES LAST! 

ATARI 600XL 

»149 



1010 Recorder '74.00 

1020 Cokr Pnnter '249.00 

1025 Ddt Matnx Rinter '34900 

1027 Letter Quality '309.00 

1030 Direct Connect Modem '119.00 

1050 Disk Onve '339 00 

CX30 Paddle •12.00 

CX40 Joystick ..each •B.OO 

CX77 Touch Tablet "64 00 

CX80 Trak Ban "4B 00 

CX85 Keypad "105.00 

488 CommunKator II '229.00 

4003 Assorted EducaDon ^47 00 

4011 Sta- RaOers "33 00 

4012 Missile Command ^29. 00 

4013 Asteroids ^29. 00 



800XL... 
1200XL. 
1400XL. 



,.*299 
.CALL 
.CALL 



CiERQOM 



5049 VisiCalc 

7079 Logo 

7101 Entertainer .. . 

7102 Area* Champ. 
8026 Oig Dug.-- 



•159.00 
•79 00 

- •69-00 

- -■75 00 
-- "33-00 



8030 E-T Phone Home "33-00 



B031 Donkey Kong-- 

6033 Robotron 

8034 Pole PosiPon 
8036 Atari Wnter 
8040 Donkey Kong, 
B043 Ms- Pacman - 
8044 Joust 



"39-00 
"35 00 
•39 00 
•79 00 
•39 00 
■39 00 
•39-00 



DISKETTES 

MAXELL 

5'A" MO-1 ^29-00 

5'/." MD-2 ^39 00 

6'' FO-1 (SS/DD) ^39 00 

6" fTI-2 (OS/00) ^49-00 

VERBATIM 

5'/." SS/00 "26.99 

5'/." DS/OO "36 99 

ELEPHANT 

5'/<" SS/SO "18 49 

5'/." SS/DD "22.99 

5%" DS/OD "28.99 

HEAD 
5'/." ask Head Cleaner "14.93 

DISK HOLDERS 

INNOVATIVE CONCEPTS 

Rip-n-Rle 10 "3 99 

Hip-n-File 50 "17.99 

Hip-n-file (400/800 ROM)Holder . . "17 99 



AT se-si 

AT B8-A1 

AT B8-S1 PD 

AT 86-DOA 

Rf=D 40-S1 

RFD 40-A1 

RFO 40-S2 

RFD 44-S1 

RFD 44-S2 

TEXAS INSTRUMENTS 
TX 99-S1 

RANA 

1000 " 

TRAK 

AT-D2 " 

INDUS 

GT-Dnve • 

MEMORY BOARDS 

Axlon 32K 

Axlor 4BK 

Axlon 12BK " 

Intec 32K 

Intec 48K 

Intec 64K 

Intec Real Time Oock 



'369.00 
'259 00 
'449.00 
'11900 
'44900 
'269 00 
'699.00 
'539.00 
'869.00 

'279.00 



•59-00 
"99-00 
299 00 
-"59 00 
"64 00 
-"99-00 
-"29-00 



ALIEN VOICE BOX 

Atan "119-00 

Apple "149 00 

CONTROLLERS & 
JOYSTICKS 

WICO 

JoysDck 

3-way Joystick 



Famous Red Ball... . 

Power Grip 

BOSS Joystick 

ATARI/VIC Trak Ball . 
Apple Trak Ball... 
Apple Adapter. .. 
Apple Analog 



KRAFT 



LJK 

Atan Letter PerfeCT 0isk(40/80)- 
Atari Letter perfect ROM(40 col]- 
Atan Letter Perfect R0M[80 c6] 
Atan Data Perfect ROM (60 col) 
Atan Spell Perfect Disk -- 

Atari Utility/MalMerge 

Apple Letter Perfect 

/ipple Data Perfect 

Apple LJK Utility 

Apple Lower Case Generator 



'79-99 
'79-99 
-'79 99 
'79-99 
-'59 99 
'21 00 
'99-00 
•75-00 
•21 00 
-•19-00 



Atan Single Rre 
Atan Switch Hitter - 

Apple Paddles 

IBful Paddles - - - 
IBM Joystick 



AMIGA 



3100 Scn^e 

3101 Pair 

Joyt3oard - 



Atan Trak Ball 
/Vpole Joystick 
Apple Trak Ball 



TG 



'21 99 
22 99 
'23-99 
'21-99 
17 99 
'34 99 
'54 99 
15 99 
'37-99 



'12 99 
15 99 
34-99 
'34 99 
'46 99 

■13-99 
19-99 
37 99 

'4799 
'47 99 
'47 99 



Canada 



west ^ 
800-648-3311 



In PA call C717]327-9575,De|it.4051E 

Order Status Number: 327-9576 
Customer Service Number: 327-1450 
477 E. am St., Williamsport, PA 17701 



In NV call (702]58a-S654,Dept 4051 
Order Status Number: 588-5654 
P.O.Box 6689 r°°~ 
Stateline, NV 89449 



Caab Ontario/Quebec w»w*»w 

800-233-8950 800-268-3974 800-648-3311 

In DA ^oii ni-jiaa-j tKTi n^nf ^nR1 ■=! Other ProvinceB800-2B8-4553 , ^y |, r7021588-5654,Deot 4051 5 - 

'"l'^'^:^l^^l;^^f'^rS^rs'' '"-r°srJir.TBlB°i?/B°^^^ OrdersLJNumber:588''-565_4 

Customer Service Number: 327-1450 asQS Dunwin Drive, Unit 3B P.u.Box o""" 1 

477 E. am St., Williamsport, PA 17701 Miasisaauga, Ontario, Canada LSL1T1 Stateline, IMW 89449 

CAMAOIAM ORDERS: All pnces are subject to shipping, tax and currency fluctuations. Call for exact pricing in Canada. ' 

INTERNATIONAL ORDERS: All shipments outsidB the Continental United States must be pro-paid by certified check only. Include 3% [minimum 

*S] shipping and handling. 

EDUCATIONAL DISCOUNTS: Additional discounts are available to qualified Educational Institutions. 

APO S FPO: Add 3% [minimum *5] shipping and handling. 
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Musical Notes for the 
Apple 

Phillip Bowers 
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Under the C64 ROM 

John A. Winnie 



26 



A Better Random 
Number Generator 

H. Cem Kaner and John R. Vokey 



36 



Control 

Mitchell Esformes 



43 



Sixteen Bit 68000 
Supermicros 

Paul Lamar and Richard Finder 



47 



Programming with 
Macros 

Patricia West erf ield 



52 



Useful Functions 

Paul Garrison 



56 



Apple lie Supplement 
to "What's Where in 
the Apple" 

Phil Daley 



7^ Inside the CIA 

Ralph Jenny 



With five octives and 
rhythm, too, you can play 
old tunes or compose new. 



Gain BASIC memory 
without losing program 
messages using RAM 
under ROM. 



A better version for 
simulations, games and 
gambling, forecasting. 



A program for assembly 
code efficiency, or 
statistics, step/trace 
debugging and more. 



Is this the 6502 of the 
80's? What will it mean for 
your computing plans? 



Make your assembly 
language more efficient, 
cleaner, easier to debug. 



Save time and 
mathematical aggrevation 
with a compilation of 
defined function. 



PEEKS, POKES, CALLS, 
etc. specific to the Apple 
lie, from Micro's best 
selling book. 



Advantages of the shift 
register on the CIA, and 
direct expansion from the 
microprocessor bus. 



Product Reviews 



15 Autoterm 



15 SuperText 
Professional 



17 Super-Text 
Professional Word 
Processor 



A communication 
package with added 
features for tiie 
CoCo. 



Tiie most recent 
version of tiiis 
powerful Apple word 
processor. 



A simple business- 
powered processor 
for the Atari. 



WO. 




18 Advanced 
X-tended Editor 



An Applesoft line 
editor for BASIC 
program 
development. 



18 The Oddsmaker 



18 BASIC Tutor 



An "Electronic 
Bookie" for the 
Apple or 
Commodore. 



A course in BASIC 
programming on the 
Apple. 



17 G.A.LE. 



An Applesoft Line 
Editor with themost 
complete set of 
commands. 



19 Card? 



A Commodore 
parallel printer 
interface for 
text/graphics. 



17 LOGO 



A fairly extensive 
implementation of 
the language for 
Commodore 64. 



Departments 



2 Highlights 
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8 Feedbacl( 

10 Spotlight: Acorn 
15 Reviews 
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77 Books 

78 Question IVIark 

79 Listing Conventions 
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At last! ...A dual 6522 versatile 

interface adapter (VIA) board 

for the Commodore-64. 

The 6522 VIA, long the preferred 
input/output chip for 6502 mi- 
crocomputers, is now available for the 
C-64. 6522 programming techniques, 
covered in many available books, can now 
be applied to the C-64 for even the most 
sophisticated real-time control applica- 
tions. Board allows full use of the IRQ 
interrupt. When combined with the 
C-64's memory capacity, it provides an 
extremely powerful yet cost-effective de- 
velopment system and controller in one 
package. Includes extensive application 
notes and programming examples. 

Up to four boards can be connected to- 
gether, providing sixteen 8-bit ports. 
Order Model 64IF22, $169 fqr one, post- 
paid USA. Each additional $149. 

Complete reconstructed Assembly Lan- 
guage source code for the C-64's BASIC and 
KERNAL ROMs, all 16 K! 

Extensively commented and cross- 
referenced. Far more than a mere "memory 
map" of useful locations, this book really does 
tell all. An incredible time-saver in eifective 
C-64 programming and understanding. Order 
C-64 Source $29.95, postpaid USA. 

SCHNEDLER SYSTEMS 

1501 N. Ivanhoe, Dept. M6 

Arlington, VA 22205 

Telephone orders/information: (703) 237-4796 

VISA MASTERCARD 



ATARI 48K * TRS C/C 32K 
COMMODORE 64 

747 FLIGHT SIMULATOR 







ACTUAL SCREEN PHOTOGRAPH 

Superbly realistic instrumentation and pilot's 
view in lifelike simulation which includes 
emergencies such as engine fires and systems 
failures. This program uses high resolution 
graphics to the full to produce the most realistic 
flight-deck display yet seen on a home 
computer. There are 21 real dials and 25 other 
indicators. Your controls operate throttle, 
ailerons, elevators, flaps, slats, spoilers, 
landing gear, reverse thrust, brakes, etc. You 
see the runway in true perspective. Uses 
joysticks and includes options to start with 
take-off or random landing approach. A real 
simulation, not just another game! Cassette 
only, $27.95 (add 6% In Calll.). Sole U.S. 
distributor for D.A.C.C. Ltd., England. 

F. Ashton 

P.O. Box 7037 
Chula Vista, CA 92012 
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Dear Editor: 

My programming abilities are just 
enough to get me into trouble. But I've 
been following your series on graphics 
and hope you can help me. 

I want to graph a time series of data 
as line graphs. Data is: High, low, 
close, date and I want to display it in 
the form: 



H 
l- 



— C 



I also want to label the axis as to price 
and time: 



PRICE 



I I I — l-H — I— I— I — I — 
1'1 2/1 3/1 OATE 



Then overlay a moving average of the 
data: 



50- 


- 


NAME 
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25- 
20- 


1 ■ 
— 1 1 1 1 


■ 1 
— 1 1 1— 1 


— 1 — 



1/1 2/1 



3/1 DATE 



Possibly adding a second series of data 
on the same chart, requiring a third 
label on axis: 



I I I — I— I — I— I— I — h 



--300 
--200 
--100 



3/1 DATE 

The kicker is that data may cover an 
extended period of time (e.g. 200 days) 
and for clarity maybe only 50 days 



could be displayed at a time. So, I want 
to be able to scroll back and forth, 
timewise (left, right) and change the 
text labels as this occurs, stopping as 
necessary and then dumping the screen 
to a printer. 

Big order? That's why I need help. 

Harvey L. Taback 
Vancouver B.C., Canada 



68000: The 6502 of the '80's 

Dear Editor: 

It's a real pleasure to be writing to you 
using the Amdek monitor that you and 
your staff awarded me for "Country 
5." I was really quite elated the day I 
received the registered letter 
announcing my good fortune in the 
Micro graphics contest. Thank you all 
very much for the recognition. 

I've been a follower of Micro since 
the days of the KIM-1 computer which 
served as my training wheels in the 
world of 6502 programming. In fact, I 
still have the motherboard and proto 
board from the Computerist holding 
the ol' KIM system together. 

As a reader of Micro I'd like to take 
this opportunity to make a suggestion 
that I believe will benefit many present 
Micro followers and perhaps attract a 
whole new following. 

The 6502 obviously has a lot of life 
left in it. Apple has just introduced the 
Apple lie and, as you must already 
know, the Western Design Center in 
Mesa, AZ is about to release the first 
full implementation of its 16 bit 
versions of the 6502 [65802 and 65816] . 
That's great for all of us die hard 6502 
programmers. I understand that Apple 
and Atari have already ordered a 
significant number of these chips for 
evaluation. 

I believe, however, that the 
Motorola 68000 series of 
microprocessors will become the 6502 
of the 80' s. I know that you folks are 
already 6809 enthusiasts, so I don't 
expect to run into too much resistance 
to the idea of supporting another great 
Motorola product. In fact, I seem to 
recall a 68000 series of articles around 
the end of 1982. What happened? 

I've begun programming the 68000 
using the QPak-68 coprocessor board 
for the Apple II. The QPak-68 is a 
complete 68000 development package 
from QWERTY, Inc. It's based on the 
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68008 and is a superb product. 
Anyway, my initial reaction to the 
68000 has been nothing if not 
enthusiastic. It's almost like working 
in a high level language after so many 
years of being zero page bound and, 
indeed, 8 bit bound with the 6502. 

As you know, Apple has adopted the 
68000 family of processors and Sinclair 
is about to unleash a $500 computer 
based on the 68008. There is no 
magazine that I know of that is 
supporting the 68000 as of yet. Why 
not do the world a favor and be the first 
to offer your readers a pathway into the 
current generation of high performance 
microprocessors , 

I must sound like a member of the 
Motorola marketing team after that 
last paragraph. No, in fact I'm a relative 
newcomer to the 68000, but I see a vast 
future for this chip family and 
apparently an increasing number of 
computer systems designers do also. 
How about putting the question to your 
readers and find out how they feel 
about Micro supporting the 68000. 

Once again thank you for the 
wonderful validation in selecting my 
Apple graphic as the first prize entry in 
the Apple II category. 

Thomas Wilson 
San Rafael, CA 

Editor's Note: The staff of Micio also 
feels that the 68000 chip may well be 
the 6502 of the '80's. We need to know 
OUT readeis ' interest in a regular 68000 
column and feature articles on this 
family from time to time. These would 
be in addition to (not in place of) our 
other chips. Please take a few minutes 
to answer the Reader Survey Questions 
on the card in this issue; we will 
analyze youi responses carefully to 
determine the direction you want 
Micro to follow. 



Medical Programs 

Dear Editor: 

Several months ago I wrote to you 
asking if any of your readers would be 
interested in contributing programs to 
a book, "Microcomputer Programs In 
Medicine. " The response from your 
readers was astounding. 

I had letters, post cards, packages of 
discs and printouts from all over 
America, various parts of Canada, 



England, Ireland, South Africa, Saudi 
Arabia, Israel, Australia, Malaysia and 
even one from mainland China. 

I had phone calls in the middle of 
the night from foreign parts apologizing 
for the time zone difference, but asking 
for details of the impending book. 

As a result, the programs have now 
been published in book form in two 
volumes. Volume I contains scheduling 
and appointment programs, direct 
patient billing and accounts receivable, 
patient file retrieval, simple statistics 
including standard deviations, etc., 
graph drawing and curve fitting, 
numeric and alphabetic sorting. 
Volume n contains programs on patient 
history taking and history 
summarization, respiratory function, 
pediatric growth percentile calculation, 
bar graph drawing, analysis table 
making, using a VisiCalc template, 
obesity advisory program for weight 
loss, CHI square statistics and analysis 
of variance. 

The book is now in print and is 
available from the publishers, 



Computer Medica Corporation, 
Medical Software Company, 328 Main 
Street, Center Moriches, N.Y. 11934, 
at $80 per volume. 

I must thank your readers again for 
the fantastic response. 



Derek Enlander, M.D. 
New York, NY 
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Don't Forget to Send 

Your Reader Survey. Do 

It Today! 
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APPLICATION 
SOFTWARE 



PAYROLL 
GENERAL 
LEDGER 
with 

CASH SMALL 

JOURNAL BUSINESS 



$499 



ACCOUNTS 
PAYABLE 

$299 

ACCOUNTS 

RECEIVABLE ^QQQ INVENTORY 

$299 '"*^** $299 

COMPLETE DOCUMENTATION $19.95 

0S9 & BASIC 09 ARE TRADEMARK OF 
MICROWARE, INC. & MOTOROLA CORP. 



SPECIALTY 
ELECTRONICS 



(405) 233-5564 
21 10 W. WILLOW - ENID, OK 73701 
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ACorn 
icrocomputer 
System 



Distributor 

Acorn Computers Corporation 
400 Unicom Park Drive 
Wobum, MA 01801 

Introduction 

The Acorn microcomputer was first developed in response 
to an invitation issued by the BBC to computer firms to 
compete in creating a new micro that would meet their 
specifications. The contract was awarded to Acorn, which, 
at the time, was only five years old. 

Various features, in particular a Local Area Networking 
capability of up to 254 Acorns, led to the acceptance of the 
Acorn as an educational tool. Presently more than 85% of 
English schools use the Acorn. The Acorn has made its 
entrance into the U.S. market with a few model systems 
established, the most recently publicized being the school 
system of Lowell, Massachusetts, where a network of 
Acorns is serving grades K-12. 

Memory and Optional Expansion Features 

The Acorn has a series of co-processors that allow optional 
expansion of the standard 64K of memory. The Operating 
System is 16K built-in ROM, 16K built-in Word Processor 
(VIEW), built-in ROM BASIC interpreter, 32K RAM for 
User Programs. The co-processors enable the addition of 
three expansion features: 

1) a 3MHz 6502 (includes an additional 64K RAM): this 
will run any program faster with more space available to 
the user 

2) a Z-80B with 64K RAM: 'the software with this unit 
allows CP/M programs to be run with more memory than 
a normal CP/M environment. In addition, the main user 
program is left free to do calculations, leaving the BBC 
Microcomputer to deal with graphics, printers, clock, 
floppy disk, etc' 

3) a NS 16032: a 16 bit machine with 32 bit internal 
architecture, can be used with up to 16 Megabytes of 
RAM. 

The Acorn has a built-in (ROM) BASIC interpreter, 
which also includes a 6502 Assembler. This permits 
Assembly Language to be mixed in the middle of a BASIC 
program. All the standard features and statements are 
available with some nice enhansions such as local 
variables, subroutines that pass parameters and recursion. 



Also built into ROM is a 16K word processor called VIEW. 
This package is of professional quality featuring local and 
global control, search, change, replace, automatic page 
numbering, etc. 

Graphics 

When first viewing the Acorn one immediately notices the 
high quality graphics; an RGB Video is used to display the 
high resolution screens. The Acorn uses a number of 
display modes, including 640 x 200 for 2 color graphics (80 
X 25 text), 320 x 200 for 4 color (40 x 25 text), and 160 x 
200 for 16 color graphics (20 x 25 text), to list a few. There 
are a number of commands which facilitate graphics 
control, including the familiar commands such as PLOT, 
DRAW, and MOVE. 

Sound/Music 

To generate sound and music the Acorn employs four 
'channels.' Through the use of SOUND and ENVELOPE 
commands a great deal of control is available to the user, 
and a full five octave range gives plenty of room to work 
in. The ENVELOPE offers a great deal of control with six 
parameters, governing the attack, decay, and release of a 
note. 

Voice Synthesis 

The Acorn also has a built-in voice synthesizer, including 
a Speech Processor and a PHROM (Phrase Read Only 
Memory). The Speech Processor is one made by Texas 
Instruments, the TMS 5220. In the PHROM chip is stored 
206 ready-made words, and other PHROMs fitted with 
different words will be available in the future. The speech 
system can be accessed from BASIC and Assembly 
language. 

Interfaces 

The Acorn includes a number of interfaces: Floppy Disk 
Interface up to 1 MB unformatted; RS423 Serial Interface 
(RS232 enhanced for speed and distance); Software 
Selectable Baud Rates between 75 and 19,200 Baud; 8-bit 
'Centronics-type' parallel printer port; four 12-bit Analog 
Input Channels -input voltage range 0-1.8V, 10ms 
conversion time for each channel; standard audio cassette 
for low-cost storage. 
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Peripherals 

Peripherals supported include: 5 1/4-inch floppy disk 
drives with capacities of 400K-800K formatted; 
monochrome, color (RGB, Composite Video) and TV; dot 
matrix and daisy-wheel printers, game paddles and 
joysticks. 

Keyboard and Physical Description 

The 73-key Qwerty keyboard is cleanly laid out, including 
10 User Definable Function Keys. It has a nice touch and 
has the break key safely put out of normal reach. The size 
is 16"W X 13 1/2"D X 2 3/4"H, weighing in at 16 lbs. The 
dual disk drive is compact and neatly designed, taking the 
space of a normal-sized single disk drive. 



ancient geography. The only problem is that it is fun and 
addictive. Plato's Cave is an introduction to the relation 
between evidence and inference (using a Platonian 
approach). The subjects covered by Kiell and other 
manufacturers of Educational Software is quite varied, 
developed for all levels and covering subjects from color to 
transpiration to gas chromatography. 

Price 

The price breakdown is as follows: for the basic 
microcomputer the price is $995.00; the 800KB dual disk 
drive is $995; a 400KB (double sided) single disk drive is 
$545; a 200KB [single sided] single disk drive is $395; a 
RGB high resolution monitor (12 inch) is $595; 
Monochrome monitor (12 inch) amber or green is $195, 




Software 

The software available for the Acorn is growing every day. 
Although all of the software that is presently in use in 
England isn't available here, there is certainly enough to 
keep anyone busy. There are packages covering business 
applications, graphics, languages and a plethora of 
educational software. American companies have been 
enlisted in converting some of the English software, in 
particular the education packages, for use in the United 
States. The name that stands out in this area is Krell 
Software Corporation (1320 Stony Brook Road, Stony 
Brook, NY 1 1 790) . The most well known of their software 
are Alexander the Great and Plato's Cave. Alexander the 
Great is a cross between Risk and Scrabble, developing 
word and arithmetic skills as well as touching upon 



both the RGB and Monochrome include cables. Prices for 
the additional co-processors are not available at this time. 

Conclusion 

Although the past emphasis has been in the area of 
education, the Acorn has just begun to conquer the many 
fields that it is capable of handling. Given its memory, 
telecommunication, graphic and other well developed 
features it certanly merits consideration for home or 
business use. 
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80 COLUMN PRINTER SALE— $149.00* 



COMSTAR T/F 



Tractor 
Friction 
Printer 



COMSTAR 



** 



15 Day Free Trial -180 Day Immediate Replacement Warranty 



• Lowest Priced, Best Quality, Tractor- Friction Printers in the U.S.A. 

• Fast 80-120-160 Characters Per Second • 40,46,66, 80,96, 132 Characters Per Line Spacing 

• Word Processing • Print Labels, Letters, Graphs and Tables • List Your Progranos 

• Print Out Data from Modem Services • "The Most Important Accessory for Your Computer" 



*STX-80 COLUMN 
PRINTER— $149.00 

Prints full 80 columns. Super silent 
operation, 60 CPS, prints Hi-resolution 
graphics and block graptiics, expanded 
character set, exceptionally clear 
characters, fantastic print quality, uses 
inexpensive thermal paper! Best thermal 
printer in the U.S.A.! (Centronics Parallel 
Interface). 

**DELUXE COMSTAR T/F 
80 CPS PRINTER— $199.00 

The COMSTAR T/F (Tractor Friction) 
PRINTER is exceptionally versatile. It 
prints 8%" x 11" standard size single 
sheet stationary or continuous feed com- 
puter paper. Bi-directional, impact dot 
matrix, 80 CPS, 224 characters. (Cen- 
tronics Parallel Interface). 

Premium Quality— 120 CPS 

COMSTAR T/F SUPER-10X 

PRINTER— $289.00 

COMSTAR T/F (Tractor Friction) SUPER- 
10X PRINTER gives you all the features 
of the COMSTAR T/F PRINTER plus a 
10" carriage, 120 CPS, 9 x 9 dot matrix 
with double strike capability for 18 x 18 
dot matrix (near letter quality), high 
resolution bit image (120 x 144 dot 
matrix), underlining, back spacing, left 
and right margin settings, true lower 
decenders with super and subscripts, 
prints standard, italic, block graphics 



and special characters, plus 2K of user 
definable characters! The COMSTAR T/F 
SUPER-10X PRINTER was Rated No. 1 by 
"Popular Science Magazine." It gives you 
print quality and features found on 
printers costing tv\/ice as much!! (Cen- 
tronics Parallel Interface) (Better than Ep- 
son FX 80). 

Premium Quality— 120 CPS 

COMSTAR T/F SUPER-15'/!" 

PRINTER-$379.00 

COMSTAR T/F SUPER ^5V^ PRINTER 
has all the features of the COMSTAR T/F 
SUPER-10X PRINTER plus a 15'A" car- 
riage and more powerful electronics 
components to handle large ledger 
business forms! (Better than Epson FX 
100). 

Superior Quality 

SUPER HIGH SPEED— 160 CPS 

COMSTAR T/F 10" 

PRINTER-$489.00 

SUPER HIGH SPEED COMSTAR T/F 
(Tractor Friction) PRINTER has all the 
features of the COMSTAR SUPER-10X 
PRINTER plus SUPER HIGH SPEED 
PRINTING— 160 CPS, 100% duty cycle, 
8K buffer, diverse character fonts, 
special symtxils and true decenders, ver- 
tical and horizontal tabs. RED HOT 
BUSINESS PRINTER at an unbelievable 
low price!! (Serial or Centronics Parallel 
Interface) 



Superior Quality 

SUPER HIGH SPEED-160CPS 

COMSTAR T/F IS'/i" 

PRINTER— $579.00 

SUPER HIGH SPEED COMSTAR T/F 
15'/:" PRINTER has all the features of the 
SUPER HIGH SPEED COMSTAR T/F 10" 
PRINTER plus a 15'/j" carriage and more 
pov\/erful electronics to handle larger 
ledger business forms! Exclusive bottom 
paper feed!! 



PARALLEL INTERFACES 

For VIC- 20 and COM-64— $49.00 
For All Apple Computers— $79.00 

NOTE: Other printer interfaces 
available at computer stores! 



Double 

Immediate Replacement 

Warranty 

We have doubled the normal 90 day war- 
ranty to 180 days. Therefore if your 
printer fails within "180 days" from the 
date of purchase you simply send your 
printer to us via United Parcel Service, 
prepaid. We will IMMEDIATELY send you 
a replacement printer at no charge, 
prepaid. This warranty, once again, 
proves that WE LOVE OUR 
CUSTOMERS! 



I Add $17.50 for shipping, handling and insurance. WE DO NOT EXPORT j 
j TO OTHER COUNTRIES EXCEPT CANADA. I 

I Enclose Cashiers Check, Money Order or Personal Check. Allow 14 days j 
! for delivery, 2 to 7 days for phone orders, 1 day express mail! Canada ■ 
I orders must be in U.S. dollars. VISA — MASTER CARD ACCEPTED. We | 
I ship C.O.D. ■ 



8UPER-10" ABCDEF6HZaKL.MNa 

ABCDEFGHUKLMNOPORSTUVUXYZ ± 



CIUTCDpDI7CS (WE LOVE OUn CUSTOMERS) 

BOX 550, BARRINQTON, ILLINOIS 60010 
Plion* 312/3025244 to order 

CaRST-UVMXVZ 



O Olympia 



(«. 



COMBINATION "DAISY WHEEL" 
PRINTER /TYPEWRITER 




"WORLD'S FINEST' 

LIST $799.00 

SALE $489.00 



SUPERB COMPUTER PRINTER COMBINED WITH WORLD'S FINEST ELECTRONIC 
TYPEWRITER! 

BETTER THAN IBM SELECTRIC — USED BY WORLD'S LARGEST CORPORATIONS! 

TWO MACHINES IN ONE — JUST A FLICK OF THE SWITCH! 

SUPERB EXECUTIVE CORRESPONDENCE - HOME, OFFICE, WORD PROCESSING! 

EXTRA LARGE CARRIAGE - ALLOWS 14-1/8" PAPER USAGE! 

DROP IN CASSETTE RIBBON — EXPRESS LIFT OFF CORRECTION OR ERASER UP TO 

46 CHARACTERS! 

PRECISION DAISY WHEEL PRINTING - MANY TYPE STYLES! 

PITCH SELECTOR — 10, 12, 15 CPS, AUTOMATIC RELOCATE KEY! 

AUTOMATIC MARGIN CONTROL AND SETTING! KEY IN BUFFER! 

ELECTRONIC RELIABILITY, BUILT IN DIAGNOSTIC TEST! 

CENTRONICS PARALLEL INTERFACE BUILT-IN (SERIAL OPTIONAL)! 

15 DAY FREE TRIAL - 90 DAY FREE REPLACEMENT WARRANTY! 



i Add $17.50 for shipping and handling!! 

I Enclose Cashiers Check, Money Order or Personal Check. Allow 
I 14 days for delivery, 2 to 7 days for phone orders, 1 day express 
I mail! Canada orders must be in U.S. dollars. VISA — MASTER 
I CARD ACCEPTED. We ship CO D. 



CMTCDpDI7CC (WE LOVE OUR CUSTOMERS) 

BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 
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® SANYO MONITOR SALE!! 




9" Dote Monitor 



80 Columns x 24 lines 
Green text display 
Easy to read - no eye strain 
Up front brightness control 
High resolution graphics 
Quick start ■ no preheating 
Regulated power supply 
Attractive metal cabinet 
UL and FCC approved 



15 Day Free Trial - 90 Day Immediate Replacemerit Warranty 



9" Screen - Green Text Display *$ 69.00 

12" Screen - Green Text Display (anti-reflective screen) *$ 99.00 

12" Screen - Amber Text Display (anti-reflective screen) *$ 99.00 

^4" Screen - Color Monitor (national brand) *$249.00 
*PLUS $9.95 for Connecting Cable. 

Display Monitors From Sanyo 



With the need for computing power growing every day, Sanyo has 
stepped in to meet the demand with a whole new line of low cost, high 
quality data monitors. Designed for commercial and personal com- 
puter use. All models come with an array of features, including up- 
front brightness and contrast controls. The capacity 5x7 dot 
characters as the input is 24 lines of characters with up to 
80 characters per line. 

Equally important, all are built with Sanyo's commitment 
to technological excellence. In the world of Audio/Video, Sanyo is 
synonymous with reliability and performance. And Sanyo quality is 
reflected in our reputation. Unlike some suppliers, Sanyo designs, 
manufactures and tests virtually all the parts that go into our products, 
from cameras to stereos. That's an assurance not everybody can 
give you! 



Officta/ Video Pmducts 
of the Los Angeles 1984 Olympics 



05^ 



• LOWEST PRICES • 15 DAY FREE TRIAL • 90 DAY FREE REPLACEMENT WARRANTY 
• BEST SERVICE IN U.S.A. • ONE DAY EXPRESS MAIL • OVER 500 PROGRAMS • FREE CATALOGS 



I Add J10.00 for shipping, handling and Insurance. Illinois rssldents f 
I please add 6% tax. Add $20.00 for CANADA, PUERTO RICO, HAWAII I 
I orders. WE DO NOT EXPORT TO OTHER COUNTRIES. j 

I Enclose Cashiers Check. Money Order or Personal Check. Allow 14 j 
I days for delivery, 2 to 7 days for phone orders, 1 day express mail! I 
I Canada orders must be in U.S. dollars. Visa ■ MasterCard - C.O.D. • 



^[^'^^f^P|!^|2pQ (WE LOVE OUR CUSTOMERS) 

BOX 550, BARRINGTON, ILLINOIS 60010 
Phone 312/382-5244 to order 



neMjsiu^ 



Product Name: Autoterm 



Equip. Req'd: 

Price; 

Manufacturer: 



Color Computer with 32K 
$39.95 cassette; $49. 95 disk 
PXE Computing 
1 1 Vicksburg Lane 
Richardson, TX 75080 



Description: A full-feature communication package with 
added features. An extensive amount of effort has been 
spent to insure user-friendliness; several detailed menus 
guide the operator in setup and operation. Any operation 
can be temporarily suspended or allowed to run in 
background mode while the user accesses a HELP screen. 
The communications ability seems to be standard - 110 
to 1200 baud full- or half-duplex, with send and receive 
capability for text, graphics, BASIC and Assembly 
Language data. Full communications using any modem 
can continue in the background mode while data is 
reviewed or edited. The connection will not be broken 
during cassette loads and save, if you desire. Provisions for 
embedded text and menu-selected print options make it 
easy to use any printer. Received data can be printed in any 
menu-defined format, regardless of the width of text lines 
received. 

An outstanding feature of this package is called 
keystroke multipliers. The purpose is to automate the 
sign-on procedures for various modems, i.e., invoke a 
keystroke multiplier which will make the connection, 
complete the contact and sign off, all automatically. 

Piuses: The low cost of this software makes it viable for 
an unlimited number of simple control and measurement 
tasks, aside from its intended communications and editing 
ability. Although full utilization of the package would be 
complex, the learning process seems to be optimized and 
friendly. 

Minuses: So far, no bugs have been found, and any 
perceived problem has been overcome with more study 
and experimentation. 

Documentation: An 81 -page manual details the operation 
of the program in a well written format, with additional 
reinforcement from the program itself. The book is well 
organized with a complete and logical index, and 
numerous detailed examples are used where needed. 

Skill level: By the time a CoCo owner has progressed to 
the need or desire for communications, he will be ready to 
use this program. 

Reviewer: Ralph Tenny 



Product Name: SuperText Professional 

Equip. Req'd: Apple II, n + , He with Applesoft ROM, 
DOS 3.3, 48K, lower case capability 

Price: $175 ($99 special) 

Manufacturer: MUSE Software, Inc. 
347 N. Charles Street 
Baltimore, MD 21201 

Description: The most recent version of one of the first 
powerful Apple word procesors. With it, a skilled user can 
write, edit, store, preview, and print documents in a wide 
variety of formats. The program supports the Smarterm, 
Full- View 80, and Videx 80-column boards for the E + , and 
either of the He 80-column cards, as well as the Apple 
40-column format. It is simple to configure the program 
for most of the popular printers. 

Pluses: One of the most unusual features is the "Math 
Mode", which permits calculations within files. This is 
particularly useful for preparing invoices, cost estimates, 
and proposals. The screen can be split and each half 
scrolled and edited separately. A key can be defined as any 
string up to 30 characters long, useful for reviews where a 
single title occurs over and over. Cursor movement is 
smooth and unobtrusive. It seems to be nearly impossible 

to make such a serious error that text is lost from memory. 
You can easily set up multi-line running heads or feet, 
embed codes for bold, italic, and other tyepface changes, 
and save or load files. There is a quick reference card. 

Minuses: SuperText creates nonstandard disk files. The 
program uses several of the same code sequences in 
different modes, and it is fairly easy to forget what mode is 
on. There is no provision for footnotes, super- or sub- 
scripts, or hyphenation. 

The Apple He uses CTRL I to tab; SuperText has not 
provided a substitute control code to turn on italics 
printing, so it is necessary to embed a dummy character 
while entering text, then use the 'change' mode to alter it. 

Documentation: The manual has no index and needs one. 
It is comprehensive, however, and almost any answer can 
be puzzled out by working through the extensive table of 
contents. 

Skill level: It requires either experience with word 
processors or great persistence to learn. A person who 
learns the program and uses it regularly, however, will 
have the use of an effective writing tool. 

Reviewer: K.C. Tinkel 
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Subscribe to MICRO... 

Save 20% and we'll send you a 

BONUS GIFT 

with your subscription! 



Receive a coupon good for one 
MicroDisk of your choice. 
A $15.00 Value — FREE! 



Each Disk contains a variety of piogiams 
fiom Micro, all entered and ready to run on 
your machine. Saves time, avoids errors. 



Fill out the attached 
card and mail today! 




Each diskette includes all of the programs in BASIC and/or 
Assembly Source, plus binary 'load-and-go' files. The price of 
only $15.00 includes shipping and handling. 
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Product Name: Super-Text Professional Word Processor 

Equip. Req'd: Atari 400/800/1200XL, with minimum 

48K 
Price: $99.00 

Manufacturer: Muse Software 

347 N. Charles Street 

Baltimore, MD 21201 

Description: 'Super-Text Professional is designed to be a 
business-powered processor simple enough for home and 
educational use,' according to the developer. It contains 
Atari DOS making all DOS functions available to the user. 
All of the basics are included; delete, find /replace, block 
operations, cursor movement, local and global control. 

Pluses: Starting with an Introduction and Help Menu, the 
user has a variety of choices and options available. The 
user can set parameters for his printer with most of the 
major printers parameters provided, the users simply 
selects the one he needs. The printer can also be controlled 
from within the text. Other nice features are automatic 
page numbering, single key commands (underlining with 
one command), format and tab specification control. 
Super-Text has a system status line displayed upon request 
which gives pertinent information when needed. Muse 
Software has also provided something called Autolink 
(trademark) which 'greatly increases the Atari's file 
organization and manipulation capabilities.' With this 
feature you can link files on the same or different disks and 
then do global finds, replaces, etc. through those linked 
files. There is a user defined function key called The Key 
whose character set you can define - up to thirty 
characters. 

Minuses: Super-Text has seperate modes for Changes, 
Adds, and file manipulation. Changing back and forth 
between modes is a little awkward to start with. It is not at 
all like other word processors in this respect. To those who 
are familiar with other packages this method will 
undoubtedly seem a bit cumbersome at first. Once this 
peculiarity is gotten used to it becomes acceptable. Again 
it differs from other word processors in its use and 
definition of inserts. If you go searching for Insert 
instructions you will find it very frustrating. There isn't 
any defined Insert; rather through manipulation of the 
delete command and the Change and Add mode you can 
achieve what is an insert. For those not used to other 
packages I suspect neither the modes or insert would be a 
problem. Those who are familiar with other WP packages 
will find a period of adaptation to these different features is 
necessary. 

Documentation: The manual provided with Super-Text is 
clearly written, with good chapter outlines. 
Unfortunately, as with many software packages, there is a 
continuation of the belief that indexes are obsolete. 

Skill level: This package is geared more for the advanced 
WP user, having all of the advanced features such a user 
would want and use. Beginners would certainly be able to 
use Super-Text, and actually may benefit from the concept 
of modes, to seperate the various functions. 

Reviewer: Mark S. Morano 



Product Name; G.A.L.E. 



Equip. Req'd: 

Price: 

Manufacturer: 



Apple II 
49.95 

MicroSPARC, Inc. 
10 Lewis St. 
Lincoln, MA 01773 



Description: A Global Applesoft Line Editor with edit 
mode, macro mode, global commands, hex/dec 
conversion, auto line number and help are easily accessed 
from BASIC or the monitor. It includes search and change, 
BLOAD information, free sectors, macro definitions for 
single key entry, a ' 'hide' ' command to temporarily store a 
program, line finding, pointer dump, renumber, variable 
cross reference, append, converting hex to dec and vice- 
versa, and a line editor with insert, delete, lower case 
entry, find, verbatim entry, and a help screen. 
Pluses: GALE is easy to use and is a great time saver for 
Applesoft programmers. It includes the most complete set 
of commands among the current popular line editors. It 
doesn't use the &.. 

Minuses: The more commands there are, the more you 
need a reference card. It should have been included to 
make the package complete. 

Documentation: A clearly written, helpful guide to 
making the most from GALE is included (53 pages) in an 
easy- to-read manner. 

Skill level: Some programming expertise is desirable to 
make the best use of GALE. 

Reviewer: Phil Daley 



Product Name: LOGO 

Equip. Req'd: Commodore 64 and 1541 Disk Drive 

Price: $49.95 

Manufacturer: Commodore Business Machines Inc. 

1200 Wilson Drive 

West Chester, PA 19380 

Description: This is a fairly extensive implementation of 
LOGO (a procedural language developed at M.I.T.). 
Supplied on a single disk, it includes system primitives 
(commands) for graphics, arithmetic &. logical operations 
and list processing. A second disk containing instructive 
demos, games and various utilities is also included. Most 
notable among the various utilities is a LOGO assembler 
which facilitates the addition of assembly language 
extensions to the language. 

Pluses: This is a powerful language which is suited to 
many levels of application. At the bottom level it is almost 
ideally suited for entertaining and teaching children 
logical thought and expression. At a higher level it is a 
good vehicle for the study of structured recursive 
programming. At the top level, the list processing 
capabilities make LOGO a suitable candidate for 
implementing AI (Artificial Intelligence) concepts on a 
micro computer. 
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Minuses: LOGO is fairly large and complex (compared to 
BASIC). It was apparently necessary to cut a few comers in 
order to implement it on micro's. One indication of this is 
the fact that the garbage collection routines do not 
function properly. It's possible for lists of unused words or 
procedure names (usually resulting from typo's] to 
accumulate and reduce the available workspace. This 
defect will only be noticed during long program 
development sessions. 

Documentation: In addition to the demo's and examples 
on the utilities disk, a 400 + page manual is provided. This 
manual contains major sections on graphics, computation, 
and list processing. It also covers sprites and sound/music 
generation. Extensive appendices cover assembly language 
programming and contain a complete glossary of LOGO 
primitives. The manual is good as a tutorial, but leaves 
something to be desired in conciseness and accessibility 
for quick reference purposes. 

Skill level: The skill required depends on which level you 
approach LOGO. Little skill is required to "drive" the 
turtle around the graphics screen. More is required to 
write concise structured programs, and considerable skill 
is required to implement AI constructs. 

Reviewer: Roger C. Crites 



Product Name: Advanced X-tended Editor 

Equip. Req'd: Apple II 

Price; * 

Manufacturer: Versa Computing, Inc. 

3541 Old Conejo Rd. 

Newbury Park, CA 91320 

Description: AXE is an Applesoft line editor which 
includes many time saving features for BASIC program 
development. Search and replace, auto line number, 
memory status, monitor commands, special formatted 
listings and line editing features are all available with AXE 
running. Editing commands include insert, delete, gobble, 
copy, uncopy, lower case, verbatim mode and a complete 
macro definition and table use for single key entry of often 
used strings. 

Pluses: AXE appears transparent to the user and is a great 
help in editing lines without the POKE 33,33 routine. 
Search and replace strings are easily defined and are very 
useful in locating and changing variable names. 

Minuses: A quick reference card is needed to help in 
remembering the different commands. I had some trouble 
in listing programs full width to the printer while AXE was 
active. 

Documentation: The 50 page manual is well written and 
clearly explains how the various commands operate. 

Skill level: Some experience with BASIC programming is 
necessary to derive all the benefits. 



Product Name: The Oddsmakei 



Equip. Req'd: 



Price: 
Manufacturer: 



Commodore 64 or 

Apple II 

Disk 

Printer optional 

$44.95 

CZ Software 

358 Forest Road 

South Yarmouth, MA 02664 



Description: This program could be called "The 
Electronic Bookie", for that is exactly its function! 
Through an easy-to-use menu driven system you take bets 
on some activity, calculate and display the para-mutual 
odds, display the amount bet on each team/horse/fighter, 
print tickets for each bet, and when the contest is over, 
display the pay-offs for each bet. Additional features 
include automatically taking a 'house cut' percentage 
from each bet and saving the betting data to disk. The 
program is so complete that the creators hope they do not 
get in trouble with 'you- know- who'! 

Pluses: Easy to use by anyone. Provides a good 
understanding of the para-mutual betting process - quite 
educational. The printed tickets feature makes the 
package really useful [for fun only, of course!). 

Minuses: Perhaps overpriced at $44.95. 

Documentation: The twenty page booklet is clearly 
written and easy to use. 

Skill level: Can be used by anyone. 

Reviewer: Robert M. Tripp 



Reviewer: Phil Daley 



Product Name: BASIC Tutor 

Equip. Req'd; Apple Il-t- or He, 1 Drive 

Price: * 

Manufacturer: Courseware Applications 

Savoy IL (c) 1983 
Distributor: SuperSoft 

P.O. Box 1628 

Champaign, IL 61820 

Description: A course in BASIC programming with 
lessons and exercises on disk and in the manual. Covers: 
what is programming, variables, expressions, entering & 
editing code, output (PRINT, TAB), input, branching (IF- 
THEN, GOTO), looping (FOR-NEXT-STEP), and READ- 
DATA. Material is fairly sophisticated. Can be used in a 
classroom or for self-study. 

Pluses: Quality of presentation is quite good. Overall 
program is well designed. Covers all major BASIC 
commands. Examples not trivial, as in many BASIC 
teaching programs. 

Minuses: Interaction is weak and inconsistent: 
sometimes when you answer incorrectly, you are shown 
the answer immediately; other times, you get 2 or more 
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tries. You are not forced to enter the correct answer (to 
show that you accept it) before proceeding. Does not 
protect against keybounce - if you press RETURN several 
times quickly, you may flash through the next screen(s) of 
info without time to read. 

Documentation: Superb manual with lesson outlines & 
goals, recaps of disk lessons, additional info, summaries, 
problems with solutions, reference list of disk commands, 
and glossary. Material presented well for older audiences; 
too many words per page for 12 yr olds to absorb (plus 
adult vocabulary). 

Skill level: Some reasoning &. problem-solving skills; age 
15-adult. 

Reviewer: Mary Gasiorowski 



Product Name: 


Card? 


Equip. Req'd: 


Commodore 64 or VIC 20 and a parallel 




(Centronics cable! printer 


Price: 


$75 


Manufacturer: 


Cardco, Inc. 




313 Matthewson 




Wichita, KS 67214 



Description: A printer interface to print text and graphics 
from your Commodore computer to any parallel printer. 
The included cables plug into the computer's cassette and 



disk drive ports without interfacing with those devices. 
Internal dip switches allow for permanent selection of 
features and software selection is also available. Card? 
features ASCII conversion, graphics printing (if your 
printer allows it), and a listing mode that converts color 
change/cursor move functions to understandable 
abbreviations. Several appendices will tutor you in screen 
dumps, printer control characters, and device selection. 

Pluses: Card?'s flexibility is its chief asset and the newest 
version supports Epson Graftrax + . Setup is easy and the 
instructions form a useful tutorial. 

Minuses: Interfacing Card? with word processors can 
become complex if the program attempts ASCII 
conversion prior to sending the data through Card?. The 
problems arise when you attempt to imbed printer 
commands in the text. However, Cardco, Inc. provides 
suggestions and promises technical support to overcome 
these obstacles. 

Documentation: A new booklet is in the works for the 
Graftrax update. Until then an addendum fills the gap. 
The instructions are detailed with intelligent examples 
and should answer your questions. 

Skill level: Recommended for intermediate and advanced 
users only. If you don't know what ASCII conversion is 
you'll have trouble taking advantage of Card?'s features. 

Reviewer: Mike Cherry 




CRACKING 

TECHNIQUES 



Share the secrets of the world's greatest crackers . . . 

Axe Man, Bozo NYC, Candy Man, Cloneman, 
Disk Zapper, Lock Buster, Long John Silver, Jim Phelps, 
Mr. Krac-Man, Red Rebel, Trystan 11, Reset Vector, The 
Woodpecker, Mr Xerox . . . and many more! 

Study complete tutorials on Boot Tracing, 
Software Tricks, Non-Maskable Interrupt, Ram 

For faster service, charge your order to 

" - ■ vis 



Card Modificatioris, Hardware Tricks and other 
tried and true technicjues. Discover indispensable 
tips on over 40 specific programs for Apple users. 

Customize your software to suit your own 
needs! Order your copy of CRACKING TECH- 
NIQUES '84 today Supplied on disk for Apple 
Computers. 



MasterCard or VISA. 

$39.95 

Call our toll free number 
and ask for Operator 68 

1-800-824-7888 

In California, call 1-800-852-7777 

J» PIRATES 
>< HARBOR 

PIRATES HARBOR, INC. 
P.O. Box 8928, Boston, MA 02114 
VOICE: (617) 227-7760 MODEM; (617) 720-3600 
Apple is a registered trademark of Apple Computer, Inc. 



I 
I 
I 



YES, I want to leam the secrets of Cracking Techniques '84. 

D Enclosed is my check/money order for $39.95 (Massachusetts residents 
add 5% sales tax). 



NAME: 



ADDRESS: 
CITY: 



_ STATE: 



_ZIP: 



PHONE: L 



® PIRATES 
X HARBOR 

PIRATES HARBOR, INC., P.O. Box 8928, Boston, MA 02114 M-1 



I 
I 
I 
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Musical Notes lor the Apple 




by Phillip Bowers 



With a 200 note table and a five octive range 
covering the entire treble, bass and alto clefs, you 
can do more than just whistle 'Dixie'. 



The greatest limitation I found with 
my APPLE n + (APPLESOFT) is its 
inability to produce a variety of sounds. 
To overcome this I wrote a small 
assembler program (28 bytes long] that 
is CALLed by a Basic program using at 
least one POKE command. 

Once loaded, the assembler 
program is capable of producing tones 
from 1.54hz to well over 15,000hz 
(cycles per second). Any tone can be 
held, from several seconds for very high 
tones, to minutes for lower tones. Four 
bytes are used in page zero (from $FC to 
$FF: 252 to 255) to control both the 
frequency of the tone and its length. 
The first two bytes set the frequency, 
and the last two limit the lingth (time) 
of the tone. Because two bytes are used 
for each, their combined values range 
from 1 to 65024 ($01 to $FEOO). The 
use of the values 0($00) and 255 |$FF) 
are restricted by the relationship 
between the two programs. 

By using page zero, it allows the 
assembler program to be located 
anywhere in RAM where it will be safe. 



For our purposes here the assembler 
program will be at address $6000, and 
the variable ASSEM, in the Basic 
program, will equal 24576. Once the 
values are set in page zero, the Basic 
program uses the command 

CALL ASSEM 

to produce the desired tone. Moving 
the assembler program only requires 
that the variable ASSEM be set to the 
decimal equivalent of the assembler's 
starting address. 

The assembler program can 
reproduce any musical note, including 
sharps/flats, up to G# below A of 
880hz. Above 880hz the rounding 
errors for many notes are too great to be 
of much use. Up to 880hz the largest 
error is 2.74 cycles, at G and G# just 
below 880hz. As the frequency 
decreases, so does the error in cycles. 

The useable musical notes are from 
G# below 880hz, to A at 27.5hz. This 
gives a 5 octive range covering the 
entire treble, bass, and alto clefs. The 
Basic program will allow a 10 octive 
range of inputs, from to 9, but octives 



1 to 5 cover the above clefs, with 1 
being the lower octive. 

To setup the assembler program 
enter Monitor 

CALL • 151 

then the RETURN key. Once you have 
the asterisk prompt, enter the 
following after it: 

6000:A5 FE 38 EA A6 FC AE 30 
CO A6 FC A4 FD CA DO FD 
88 DO FA E9 01 DO EB C6 
FF DO EB 60 00 

then RETURN. 

The above should be entered as one 
continuous string, with each byte 
seperated by a space. It is shown as it 
would basically appear in a memory 
dump. A memory dump is done by 
entering 

6000.601 C 

By entering 

6000L 

you will get an assembler listing. The 
listing is reproduced as a debugging aid. 
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6000- 

6002- 

6003- 

6004- 

6006- 

6009- 

600B- 

600D- 

600E- 

6010- 

6011- 

6013- 

6015- 

6017- 

6019- 

601B- 

601 C- 



A5FE 

38 

EA 

A6FC 

AE 30 CO 

A6FC 

A4 FD 

CA 

DOFD 

88 

DO FA 

E9 01 

DO EB 

C6FF 

DO E8 

60 

00 



LDA $FE 

SEC 

NOP 

LDX $FC 

LDX $C030 

LDX $FC 

LDY $FD 

DEX 

BNE $600D 

DEY 

BNE $600D 

SBC # 

BNE $6002 

DEC $FF 

BNE $6006 

RTS 

BRK 



To save this to disk, use the 
following: 

BSAVE ASSEM SOUND, A$6000, 
L$1C 

The length shown ($1C| will not save 
the last byte at $601C; it is included to 
show the ending address only. 

Still in Monitor, enter 
FC:F9 02 07 18 

then 
6000G 

when the RETURN key is pressed it 
will execute the assembler program 
using the values at $FC to $FF. The 
note should be G below middle C, and 
last 15 seconds. After the assembler 
program has executed, the value at 
address $FF should be equal to ($00), 
the other values should be untouched. 
If your values differ, check for an error. 

For A below middle C: 
FC:C2 02 D9 1A 

for D above middle C: 
FC:50 02 81 23 

these values should all give 15 second 
notes when the assembler program is 
executed. 

After the "Musical Notes" program 
is entered the keyboard keys 
"QWERTYU"should be marked to 
read "ABCDEFG", respectively. The 
sharp/flat of a note is obtained by 
pressing the "CNTL" key and the note 
key together. A rest note is given by the 
space bar. 

As each note is entered, it will be 
stored in an internal table for replaying, 
and displayed to the upper 20 text 
lines. The note table (NT) holds the 
values for the note frequency and its 
length in a low order, high order format 
that are POKEed directly into addresses 
$FC to $FF. Each note displayed to a 
text line will have the format ' 'ABCb", 
where: 
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A = the octive the note is in [0 to 

9). 
B = the note value, A through G. 

C = the note time; 
W : whole 
H : half 
4 : fourth 
8 : eighth 
1 : sixteenth 
3 : thirty-second 
6 : sixty-fourth 
b = space, note separator. 
A sharp /flat of the note will have 
the same format, except that it will be 
in the INVERSE mode. A rest note will 
be displayed as "bRCb". The "R" 
meaning a rest note, and the "C" the 
rest time. 

This format allows 10 notes per text 
line, and by using the first 20 text lines, 
it permits 200 notes to be displayed. 
The last 4 text lines are for program 
information. 

When the program is executed, the 
first input line will be: 

ENTER BEATS PER MINUTES (4TH 
NOTE) 

If no value is entered, the beats per 
minute will be set to 120. Some sheet 
music will have a note symbol [like a 
quarter note), followed by an equal 
sign, then a number in parenthesis near 
the upper left comer. This number is 
the beats per minutes. Whatever value 
is entered at this point will be the base 
for timing all other notes. 

Once the beat is entered, you are 
ready to start entering notes. To change 
the octive, press any of the numeric 
keys (0 to 9). Line 22 (VTAB 22) will 
show the current octive. 

The "BEAT =" shows the base 



beat of 120 at a quarter note value. To 
change the beat for any note, or group 
of notes, the keys "ASDFGHJ" are 
used. 

A = whole note. 

S = half note. 

D = fourth note. 

F = eighth note. 

G = sixteenth note. 

H = thirty-second note. 

J = sixty-fourth note. 
By pressing the "A" key, the beat 
will change from: 
BEAT = 120 AT 4TH = 120 

to: 

BEAT = 120 AT WHOLE = 30 

the last number is the beats per minute 
for a whole note. 

Once a note is entered it cannot be 
deleted, but it can be changed to any 
value. The ", " and "." keys are used 
to move the cursor over any note you 
want to change. The "," will move the 
cursor to the left, lower in the note 
table, while the " . " will move it to the 
right, but will not allow movement 
beyond the next enterable note 
position. 

While the left and right arrow keys 
would have been better, they were not 
used because the right key has the same 
value as the "CNTL" and "U" keys, 
which would give the note G#. 

The option "Z : RUN NOTES (0)" 
shows how many notes are currently 
being stored, and will run all notes 
regardless of the cursor position. 

In the event either the "X" or "C" 
is pressed, you will be asked if you 
really want it before they do their 
thing. Option "X" will CLEAR 
everything, and restart the program to 



Listing 1 














5 


GOSUB 


255: HIMEM: ASSEM 






© 


li 


10 


VTAB 21: PRINT "ENTER 


NOTE OR OPTION : 


": 








PRINT 


"OCTIVE= "OL " BEAT= "BM " 


AT "BV$" = "BM / BV 


rt 






15 


PRINT 


"Z:RUN NOTES("NO")" TAB( 20)"X:NEW NOTES": 


PRINT "C: 


© 






END PROGRAM" 










20 


VTAB VT: HTAB HT: GET 


IN?:ER 


= 0:KI = ASC (IN$): 


GOSUB 100: 








IF ER 


= THEN VTAB 2; 


): HTAB 


1: GOTO 15 






|,|: 


25 


IF KI 


= 65 THEN BV$ = 


"WHOLE 


":BV = 4: GOTO 70 




© 




26 


IF KI 


= 83 THEN BV? = 


"HALF" 


:BV = 2: GOTO 70 








27 


IF KI 


= 68 THEN BV$ = 


"4th ": 


BV = 1: GOTO 70 








28 


IF KI 


= 70 THEN BV$ = 


"8TH": 


BV = .5: GOTO 70 








29 


IF KI 


= 71 THEN BV$ = 


"16TH" 


:BV = .25: GOTO 70 




© 




^^ 


IF KI 


= 72 THEN BV$ = 


"32ND" 


:BV = .125: GOTO 70 








31 


IF KI 


= 74 THEN BV$ = 


"64TH" 


:BV = .0625: GOTO 70 








35 


IF KI 


> = 48 AND KI 


< = 


57 THEN OL = KI - 48: 




© 






HTAB 1: GOTO 10 










A0 


IF KI 
GOSUB 


= 44 AND NP.- 1 
225 : GOTO 20 


> - 


1 THEN NP = NP - 1: 




© 
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60 
70 
I 
100 



105 

110 
115 

120 
I 

125 
130 

•l35 
140 
145 

I 
150 

'l55 
I 

160 
165 
,170 
175 
180 
185 



190 
195 
200 
205 



MP + 1: GOSOB 215: GOTO 20 



© 



© 



210 
215 

•220 
225 

,230 
235 

240 

1245 

255 



'260 

265 

270 

275 
'280 

285 
290 
295 
300 



FH - 1) + 
.5) 
- LH) » 255): 



RETURN 



'Y' FOR "IN$", 



Listing 1 (continued) 

45 IF KI = 46 AM) (MP < NO) THEN MP 
IF KI = 90 THEN GOSUB 200 
IF KI = 88 OR KI = 67 THEN 180 
GOTO 20 

SB = (60 / BM) » BV:TM = INT (((SB » (IE + 6)) / 36372) + 0.5): 
HTAB 1: GOTO 10 

SV = OL: IF KI = 32 THEN OL = 0:XF = 0: GOSUB 145: 

IN$ = " R" + LEFT$ (BV$,1) + " ": PRINT IN$: 

NT(NP,0) = FL » ( - 1):NT(NP,1) = FH:NT(NP,2) = LL: 

NT(NP,3) = LH:OL = SV: GOSUB 215: GOSUB 170: RETURN 

FOR X = TO 11: IF KI = KV(X,0) THEN NV = KV(X,l): 

XF = X:X = 98 
Q110 NEXT : IF X = 12 THEN ER = 1: RETURN 

GOSUB 145:NT(NP,0) = FL:NT(NP,1) = FH:NT(NP,2) = LL: 

NT(NP,3) = LH 

IN$ = "":IN$ = STR$ (OL) + MID$ (KL$,NV,l) + 

LEFT$ (BV$,1) + " ": IF KI < 32 THEN INVERSE 

PRINT IN$: NORMAL : GOSUB 215 

POKE 252, FL: POKE 253, FH: POKE 254, LL: POKE 255, LH: 

CALL ASSEM 

IF (NP + 1 > NO) THEN NO = NO + 1:NP = NP + 1: RETURN 

NP = NP + 1: RETURN 

OC = (2 t OL) » (2 t (XF / 12)):CY = SO » 00:TC = TM » OC: 

PS = IE + 6 / (2 » CY) 

FH = INT ((PS + 1254) / 1279) :FT = 21 + (5 * 

(1274 « (FH - 1)):FL = INT (((PS - FT) / 5) + 

TI = TC:LH = INT (TI / 255) :U = (((TI / 255) 

IF LL = THEN LL = 1 

LH = LH + 1 

RETURN 

IF (NP + 1 > NO) THEN NO = NO + 1:NP = NP + 1: 

NP = NP + 1: RETURN 

IN$ = "END": IF KI = 88 THEN IN$ = "NEW" 

VTAB 21: HTAB 1: INVERSE : PRINT "ENTER 

ANY KEY TO IGNORE. "; : GET IN$: NORMAL : 

IF IN$ < > "Y" THEN HTAB 1: GOTO 10 

IF KI = 67 THEN 300 

CLEAR : HOME : GOSUB 260: GOTO 10 

IF NO = THEN RETURN 

FOR X = TO NO - 1: POKE 252, AflS (NT(X,0)): 

POKE 253,NT(X,1): POKE 254, NT (X,2) : POKE 255,NT(X,3): 

IF NT(X,0) < THEN POKE ASSEM + 8,0 

CALL ASSEM: POKE ASSEM + 8,192: NEXT : RETURN 

HT = HT + XI: IF HT = 41 THEN HT = 1:VT = VT + 1: 

IF VT = 21 THEN GOSUB 235 

RETURN 

HT = HT - XI: IF HT < 1 THEN HT = 37: VT = VT - 1: 

IF VT = THEN VT = 1:HT = 1 

RETURN 

INVERSE : VTAB 21: PRINT "TABLE FULL !! ANY KEY 

TO CONTINUE. "; : GET IN$: NORMAL 

NP = NP - 1:VT = VT - 1:HT = 37: IF NO < 200 THEN NO = NO + 1 

RETURN 

HOME : PRINT "MUSICAL NOTES FOR THE APPLE": PRINT : 

PRINT "BY PHILLIP BOWERS": PRINT : 

PRINT "ROCHESTER, N.Y.": PRINT 

BM = 120: INPUT "ENTER BEATS PER MINUTE (4TH NOTE) ";B$: 

SB = VAL (B$) : IF SB > THEN BM = SB 

BV$ = "4TH":BV = 1:SB = 60 / BM: 

TM = INT (((SB » (IE + 6)) / 36372) + 0.5) 

ASSEM = 24576: DIM KV(ll,l): DIM NT(199,3) : FOR X = TO 11: 

READ NO,NP:KV(X,0) = NO:KV(X,l) = NP: NEXT :KL$ = "AflCDEFG" 

VT = 1:HT = 1:XI = 4:N0 = 0:NP = 0:ST = 13.75:SC = ST:OL = 1 

X = PEEK (ASSEM): IF X < > 165 THEN IN$ = CHR$ (4):- 

PRINT IN$;"BLOAD ASSEM SOUND" 

HOME : RETURN 

DATA 81,1,17,1,87,2,69,3,5,3,82,4 

DATA 18,4,84,5,89,6,25,6,85,7,21,7 

VTAB 21: HTAB 1: 

PRINT "PROGRAM END ROUTINE ": END 



the initial beats per minute. 

Option "C" does not directly END 
the program, rather it passes control to 
line 300. The lines 300 through end 
have been left open so that you can save 
the note table, or whatever else you 
may want to do before ENDing. 

Any key other than those 
mentioned above will be ignored. The 
program will just continue along its 
merry way. 

The note table is defined in line 270 

DIM NT(199,3) 

where 

NT(NO,0) = low order value for the 

NT|NO,l) = high 

order value for the note. 

NT(NO,2J = low order value for the 

note length. 
NT[NO,3J = high order value for the 

note length. 

The current number of table entries is 
equal to NO - 1 . The value of ASSEM is 
also set in line 270. 

Even though the number of entries 
can be made greater than 200, it is not 
suggested because you will lose the 
relationship between the screen notes 
and the notes in the note table once 
more than 200 notes are entered. 

In conclusion, I would like to point 
out that the note table (NT) uses over 9 
times more space than is necessary to 
store the note values and their lengths. 
This is because we are using an array 
defined by a Basic program. Because of 
this it is not possible to use HGR (page 
1). While the basic program uses about 
2400 bytes, the note table requires an 
additional 9600 bytes to save the 800 
bytes needed by the assembler 
program. 

While it is possible to POKE these 
values directly into RAM, it should be 
noted that it will actually require 1000 
bytes to store the data. An additional 
byte is needed for each note to indicate 
a rest value. In the basic program a rest 
note uses the same 4 data bytes as any 
other note, except that the low order 
rest value is negative (NT(NP,0))...line 
100 in the program. 

When the notes are replayed the 
absolute value (ABS) value is POKEed 
into address $FC (252), and the 
assembler program is altered so as not 
to reference the speaker location when 
a negative value is encountered. But it 
is executed in the same manner as any 
note. So if you decide you need more 
space, or want to use HGR, then 
remember to include the additional 
byte for each note. 

iMCRO 
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Under the 64 ROM 

♦ ♦♦♦♦^♦♦♦♦4 

by John A. Winnie 



Requirements: Commodore 64 

Although the Commodore 64 has a 
hefty chunk of free BASIC memory 
(38911 bytes at power-up), sometimes 
it can still turn out that additional 
memory will make the difference 
between a polished program and dull 
code seriously weakened by 
compromises. In many programs the 
chief memory-muncher is the string 
data; the various descriptions and 
messages that eat up BASIC bytes by 
just being in the program, and then go 
on to cost even more when they are 
accessed by arrays. A good adventure 
game, for example, may inflict 
hundreds of different messages on its 
player ("You can't take that. It's tied 
down."), and if these are all stored in 
the BASIC programming area, valuable 
programming space is lost. 

The program presented here, called 
"Printout", solves the problem of 
string data storage simply and 
economically. Although it is written in 
machine language , it is unnecessary to 
know machine language in order to use 
it most effectively; however, it is a 
good idea to know just what it does. 

What Printout Does 

Between them, two ROM (read-only 
memory) chips in the 64 use up to 16K 
of what would otherwise be free RAM. 
The first chip contains the 64's version 
of BASIC and lies over memory 
addresses 40960 through 49151 
($AOOO-$BFFF). The second ROM chip 
contains the operating system of the 64 
and is called the "Kemal". It covers 
memory addresses 57344 to 65535 
($EOOO-$FFFF). Since the first chip 
contains BASIC and the Kemal ROM 
contains the operating system's 
machine code routines, it seems that 
the 1 6K of RAM has been sacrificed to 
some good purpose-and, of course, this 
is quite true. Remarkably, however. 



Free up your BASIC memory without sacrificing 
program messages using tlie 16K of RAM under 
the BASIC and Kernal ROM chips. 



much of the sacrifice can-with a little 
finagling-be avoided altogether. 

First of all, data may be placed in 
these locations in the usual ways: by 
direct pokes from BASIC, for example, 
or by loading a file straight into the 
under-ROM area. The trick is to get the 
data out once it has been stuffed in. A 
PEEK to any of these locations, for 
example, will read the contents of the 
ROM chip at that address, not what is 
stored in the underlying RAM location. 

Fortunately, there is a way around 
the problem. Both ROM chips may be 
switched out by a simple poke 
(POKEl,52j, exposing the underlying 
RAM in all its glory! Peeking is now 
added to pokLng-or would be, except 
for one thing: with BASIC so cavalierly 
switched away, so too for PEEKing! 
This is why we need machine language 
to finally solve the problem. We can 
switch off the two ROM chips using 
BASIC, but we need machine language 
to access the now-exposed RAM, and, 
when we are through with that, switch 
us back again to BASIC. 

Now Printout does all this and 
more. Once the ROM chips have been 
switched out. Printout prints to the 
screen any messages that have been 
stored under the ROM chips. Of course, 
the messages must be stored there in 
the appropriate form. First of all, each 
message must be surrounded by zeroes; 
the message itself is coded by simply 
using the ASCII number of each of its 
characters. Thus the sequence: 

HELP! ERROR 
0,72,69,76,80,33,0,69,82,82,79,82,0, 

when stored in memory locations 
40960 through 40972, encodes the two 
messages: "HELP" and "ERROR". 
When strings are stored in this way, all 



that Printout needs to know is which 
message you would like printed out 
(counting 0,1,2,...), and where your 
block of messages begins (in this 
example, at 40960). So to use Printout, 
POKE the message number into 
memory location 2 (decimal), and the 
low and high bytes of the base address 
of the message block into locations 251 
and 252 (decimal), respectively. [Much 
of this is done for you by subroutine 
50000 in the program Printoutloader of 
Listing 1). 

Using PRINTOUT 

Listing 1 is a BASIC loader for Printout. 
After adding it to your program, a call 
to subroutine 60000 loads Printout into 
memory locations 828 through 883. 
The other subroutine included (50000) 
may now be called when a message is 
to be printed. It needs to be supplied 
with only two pieces of information. 
First, the base address of the block 
where your messages are stored; this is 
the value of the variable ADD. And 
second, the message number must be 
supplied; this is the value of the 
variable ME. When subroutine 50000 is 
now called, the ME-th message will be 
printed, beginning at the current cursor 
position. (Normally, that cursor 
position will be set by the rest of the 
program before calling this subroutine) . 
The load address (828 decimal) in lines 
50010 and 60002 of Listing 1 (and 
Listing 3) is not critical. Since the 
machine code is relocatable, any free 
area of RAM may be used to hold 
Printout's 56 bytes. 

Of course, in order to use Printout, 
messages must be previously stored 
under the BASIC or the Kernal ROMs. 
An easy way to do this is to create a 
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program file of these messages, and 
then load this file at the beginning of 
your program. Listing 2, 
Messagewriter, is designed to create 
such files. In line 20 you specify the 
total number of messages (minus one), 
and in line 25 you specify the base 
address of this block of messages. You 
supply the actual messages in the data 
statements beginning at line 500. Since 
you will need to keep track of your 
messages and their numbers, 
Messagewriter also generates a 
numbered, hardcopy list of your 
messages. 

Listing 3 provides an example of 
using Printout to list the messages used 
earlier in Listing 2. It assumes that you 
already have run the program of Listing 
2 and have the program file 
"Messages" on your disk. Although 
the program of Listing 3 does not do 
anything spectacular, it does wrap up 
all that has come before. If you 
understand how it works, then the 
power of Printout and the new 16K that 
comes with it is at your fingertips! One 
more thing. Since Printout places no 
restrictions on string length, an entire 
screen may be stored under ROM as a 
single 999 byte string. When Printout is 
called, the stored screen is displayed 
almost instantly, certainly much more 
rapidly than when a screen is loaded 
from a disk file. 

To the Machine Language Beginner 

As the assembly listing shows. Printout 
is in general quite straightforward. The 
one slightly tricky thing is that it uses a 
Kernal ROM routine (CHROUT, at 
$FFD21 on data stored under the Kernal 
ROM itself. So the Kernal, after first 
being switched off to permit access to 
the character data, is next switched 
back on to permit the Kernal routine 
CHROUT to print out the character. 
Next--and here is the tricky part-- 
the Kernal is switched back off again to 
get the next character. But CHROUT, 
it happens, restores the hardware 
along its way! 
an intermpt now take 
the Kernal ROM is 
the system will crash, 
interrupt routines are 
Kernal ROM routines. 



interrupts 

Should such 

place while 

switched out 

since the 

themselves 

Hence the added step (SEI) to 

repeatedly disable the hardware 

interrupts each time CHROUT is used. 

The moral should be clear: even though 

interrupts have been disabled initially, 

each time a Kernal routine is used--any 

Kernal routine--the safest bet is to 

again disable interrupts before going on 

to switch off the Kernal ROM. 



PRINTOUTLOADER 

50000 REM » PRINTOUT SUB » 

50005 REM * INPUTS ARE ME AND ADD » 

50010 POKE 2,ME:HB=INT(ADD/256):LB=ADD-256»HB: 

POKE 251,LB:POKE 252,HB:SYS 828:RETURN 
60000 REM * LOAD PRINTOUT DATA SUB * 
60002 FOR 1=828 TO 883: READ Q:POKE I , Q : NEXT : RETURN 
60005 DATA 120,169,52,133,1,162,255 
60010 DATA 160,255,198,252,232,200,208 
60015 DATA 2,230,252,177,251,240,2 
60020 DATA 208,245,228,2,208,240,200 
60025 DATA 208,2,230,252,177,251,208 
60030 DATA 6,169,55,133,1,88,96 
60035 DATA 162,55,134,1,32,210,255 
60040 DATA 120,169,52,133,1,208,227 

MESSAGEWRITER 

10 REM » MESSAGEWRITER * 
20 NMESS=5:REM » NUMBER OF MESSAGES -1 » 
25 ADD=57344:REM # BASE OF MESSAGE BLOCK * 
30 RESTORE : PRINT" {CLEAR, DOWN10}" 

TAB (10) "PRINTOUT OR FILE(P/F)?" 
35 GET A$:IF A$=""OR(A|<> "P"ANDA$<> "F") GOT035 
37 PRINT"{CLEAR,DOWN10} "TAB (15) "THANK YOU." 
40 IF A|="P"THEN GOSUB 100: GOTO 30 
45 REM » WRITE MESSAGE FILE » 
50 OPEN 15, 8, 15 :PRINT#15,"S0: MESSAGES" 
60 OPEN 5,8,5, "0:MESSAGES,P,W" 
65 HB=INT(ADD/256):LB=ADD-256»HB 
70 PRINT#5,CHR|(LB)CHR|(HB);: 

REM » FILE WILL LOAD AT ADDRESS = ADD » 
75 FOR 1=0 TO NMESS:READ D$:L=LEN(D|) 
80 PRINT#5,CHR|(0); 
85 FOR J=l TO L:PRINT#5,MID$(D$,J,1); 
90 NEXT: NEXT 

95 PRINT#5,CHR|(0);: CLOSE 5:CL0SE 15:G0T0 30 
100 REM » PRINTOUT SUB * 

110 OPEN 1,4:PRINT#1,CHR|(14) "MESSAGE LIST"CHR|(15) 
120 FOR 1=0 TO NMESS:READ D|:PRINT#1,I,D$:NEXT 
130 PRINT#1:CL0SE1: RETURN 

500 DATA HELLO THERE, YOU ARE IN A DARK CAVERN 
510 DATA WHY NOT?, THAT WAS VERY FOOLISH 
515 DATA STOP RIGHT THERE!, 

YOU HAVE BEEN KILLED. TRY AGAIN? 

MESSAGE DEMO' 

5 REM » MESSAGE DEMO * 

10 IF L=0 THEN L=1:L0AD "MESSAGES ", 8 , 1 

20 GOSUB 60000: REM * LOAD PRINTOUT * 

100 ADD=57344:REM » BASE ADDRESS OF MESSAGE BLOCK # 

105 NMESS=5:REM » (NUMBER OF MESSAGES)-1 

110 FOR 1=0 TO NMESS:ME=I:GOSUB 50000:PRINT CHR|(13):NEXT 

120 GOTO 110 

50000 REM » PRINTOUT SUB » 

50005 REM # INPUTS ARE ME AND ADD » 

50010 POKE 2,ME:HB=INT(ADD/256):LB=ADD-256»HB: 

POKE 251, LB: POKE 252, HB: SYS 828: RETURN 
60000 REM * LOAD PRINTOUT DATA » 
60002 FOR 1=828 TO 883:READ Q:POKE I , Q : NEXT : RETURN 
60005 DATA 120,169,52,133,1,162,255 
60010 DATA 160,255,198,252,232,200,208 
60015 DATA 2,230,252,177,251,240,2 
60020 DATA 208,245,228,2,208,240,200 
60025 DATA 208,2,230,252,177,251,208 
60030 DATA 6,169,55,133,1,88,96 
60035 DATA 162,55,134,1,32,210,255 
60040 DATA 120,169,52,133,1,208,227 
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Listing 1 



PRINTOUT STRINGS STORED UNDER BASIC 
OR UNDER THE KERNAL. 

STRINGS ARE STORED IN THE FORM: 
0,-,-,-,0,-,-,-,-0,— ETC. 

THE STRING PRINTED IS THE N-TH STRING STORED 
IN THAT BLOCK OF STRINGS WHICH BEGINS AT THE 
BASE ADDRESS POINTED TO BY BASELO,BASEHI. 

THE STRING NUMBER N IS PREVIOUSLY POKED 
INTO MEMORY LOCATION 2 (= 'STRING'). 



0828 


y 


ORG $828 ; 


RELOCATABLE 


0002 


'string 


EQU 2 




00FB 


BASELO 


EQU 251 




00FC 


BASEHI 


EQU 252 




0828 78 


> 


SEI 


DISABLE INTERRUPTS 


0829 A9 3-^ 




LDA #52 


OUT KERNAL/BASIC 


082B 85 01 




STA $01 




082D A2 FF 


) 


LDX #255 


SET CNTRS 


082F A0 FF 




LDY #255 




0831 C6 FC 




DEC BASEHI 




0833 E8 


'count 


INX 




083-^ 08 


HUNT 


INY 




0835 D0 02 




BNE GTBYTE , 


NOT PAGE END? GO ON. 


0837 E6 FC 




INC BASEHI 


PAGE END. NEXT PAGE. 


0839 Bl FB 


gtbyte 


LDA ( BASELO ),Y 


; GET BYTE 


083B F0 02 




BEQ CHECK 


A ZERO. THE RIGHT ONE? 


083D 00 F5 




BNE HUNT , 


NOT ZERO. KEEP HUNTING. 


083F E4 02 


'check 


CPX STRING 


THE RIGHT ZERO? 


0841 D0 F0 




BNE COUNT , 


NO? FIND NEXT ZERO 


08^3 C8 


PRINT 


INY 


READY TO PRINT 


0844 D0 02 




BNE OUTPUT 


NOT END OF PAGE? PUT IT OUT. 


0846 E6 FC 




INC BASEHI 


END? TURN PAGE. 


0848 Bl FB 


OUTPUT 


LDA ( BASELO ),Y 


; GET CHARACTER 


084a D0 06 




BNE CHROUT 


NOT END OF BLOCK? PRINT IT. 


0840 A9 37 




LDA #55 


END OF BLOCK. RESTORE KERNAL 


084E 85 01 




STA $01 




0850 58 




CLI 


RESTORE INTERRUPTS 


0851 60 




RTS 


DONE! 


0852 A2 37 


'CHROUT 


LDX #55 


RESTORE KERNAL/BASIC 


0854 86 01 




STX $01 




0856 20 D2 FF 




JSR $FFD2 


, CHROUT (KERNAL) 




; TRICKY. 


$FFD2 RESTORES 


INTERRUPTS, 




; SO THE"i 


' MUST BE DISABLl 


ilD AGAIN. 


0859 78 




SEI 




085A A9 34 




LDA #52 


; TAKE OUT KERNAL 


085C 85 01 




STA $01 




085E D0 E3 




BNE PRINT 


; NEXT CHARACTER 



0860 



END 
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Reap the fruit of 7 years of labor— a superior 
version of the random number generator, for 
simulations, gambling, forecasting. 
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In this article we present an assembly 
language program, interfaced to 
Applesoft via the USR function, which 
provides three independently 
addressable RNGs. Because there is so 
little available in relatively 
nontechnical language about RNGs, 
and because of their growing 
importance, we will also describe how 
we chose them. Finally, we will outline 
some of the tests that we performed on 
them. The quality of a random number 
generator is not determined by the 
elegance of its code, but instead by the 
randomness of the sequences of 
numbers that it produces. The test 
results are always the most important 
part of the documentation of any RNG. 

The RNG Algorithm 

There are many ways to produce 
pseudo-random numbers, a few of 
which work reasonably well. Donald 
Knuth's excellent 178-page chapter on 
RNGs describes quite a few of all 
varieties. We use what is called a mixed 
linear congruential generator. Suppose 
that you store the numbers you 
generate in an array, so R[l] is the first 
number, R[2] is the second, and so on 
through R[N]. Let a, c and m be 
constants. We'll be concerned with 
their values later. The mixed linear 
congruential generator is defined by the 
following equation; 

R[N+1] = (aR[N] + c) modulo m 



In other words, if your last random 
number was R[N], your next one is 
obtained by multiplying R[N] by a, 
adding c to the product, and finding the 
value of that result modulo m. As usual 
(see the integer BASIC manual on 
MOD for more details) to obtain a 
number modulo m you divide it by m 
but keep the remainder rather than the 
quotient. For example; 

13 mod 10 = 23 mod 10 = 972863 mod 10 = 3 

A mixed congruential generator 
does not produce "truly random" 
numbers (no software RNG can) 
because it is possible, given knowledge 
of a, m and c to predict the next 
number from the last. However, if a 
and c are properly chosen and m is 
reasonably large, a person who did not 
know the formula, or even one who did 
know it but who didn't have a very 
good calculator handy, would be hard- 
pressed to predict the next number. 

Selection of the RNG's Parameters 

Not every mixed linear congruential 
random number generator is good. 
Most are terrible. The values of a, c and 
m determine how good the RNG will 
be. These three numbers are called the 
parameters of the generator. Different 
considerations are involved in choosing 
each number. Generally, m is chosen 
first, then a and c. 

It is easy to find values of a and c 
which will guarantee that the RNG will 



Random number generators 
(RNGs for short) are functions that 
produce pseudo-random numbers. 
Usually the numbers produced are 
fractions between and 1. ideally, a 
computer language's RNG should be 
able to generate every fraction that 
the language can represent, every 
fraction should be as lil<ely to be 
generated as every other, and the 
order of the numbers should be 
completely unpredictable to the user. 
Slightly more formally, the RNG 
should produce sequences of 
numbers which, so far as standard 
statistical tests can tell, behave in 
the same way as "truly random" 
number sequences would behave. 

RNG's are used to simulate 
imperfectly predictable real life 
events. Computer games use them in 
this way. So do some insurance 
companies, when setting rates. 
Economists, psychologists, 
sociologists, consumer behavior 
researchers of various backgrounds, 
often work with theories of such 
complexity that the only way that 
they can decide whether a theory is 
correct is to simulate the behavior of 
a population on the computer, and to 
compare this with the actual behavior 
shown by the groups they are 
studying. Gamblers use random 
number generators to "shuffle" cards 
or "roll" dice. They try different 
betting strategies at the computer, 
where it's free, rather than at the 
casino (or the stock market), where 
they can lose their shirt. Simulation 
involving random number generators 
Is often called Monte Carlo 
simulation, after the casinos in 
IVIonte Carlo: much of the early 
research on probability and statistics 
was financed by gamblers. As final 
example of simulations, estimates of 
the likelihood of an accident in a 
nuclear reactor, and of its probable 
severity, are often made by 
simulation, before the reactor is built, 
to check if safety measures are 
adequate. 

RNG's are also used to provide 
random test data for input to complex 
computer programs. It is impossible 
to test every branch or path in a major 
program. Random inputs or 
combinations of inputs often expose 
bugs that a systematic selection of 
test cases missed. 
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Numerical analysts work with 
RNGs to obtain numerical estimates 
of the solutions of complex 
mathematical functions for which no 
theoretical solutions exist, or to 
provide estimates against which a 
theoretical solution (which may be 
wrong) can be checked. 

Randomization of the order of 
events in experiments, so that people 
(rats, whatever) cannot predict 
exactly what will happen next, has 
been a necessary part of the design 
of every experiment that we have run. 

These are only some of the uses 
of random number generators: among 
other common ones are random 
sampling (for surveys and for quality 
control, for example), and partially 
random decision making (sometimes 
the best way to make an important 
decision, as studied in Game Theory). 

The better the random number 
generator, the more lifelike or 
interesting the simulation, the 
stronger the test of the theory, the 
more likely the numerical solution is 
to be right, the more hidden bugs can 
be expected to be found in the 
program, the more valid the 
statistical test, the tighter the 
experimental control, the more 
representative the survey, the more 
unpredictable the decision. 

IVIost implementations of high 
level computer languages provide 
something in their function library 
that the manual calls an RNG. 
Applesoft's RND function is typical of 
those we've seen on small systems. 
The reference manual describes RND 
as a source of random numbers, but it 
provides no evidence whatever that 
this claim should be believed, nor any 
warning that it should be taken with a 
mountain of salt. 

RND, when subjected to standard 
statistical tests, fails them badly. 

We should stress here that we are 
not singling out Apple for criticism. In 
our experience with various mini and 
microcomputers, manuals which 
admit to low-grade RNG's are nearly 
as rare as language implementations 
that provide an RNG worthy of the 
name. 

It is not surprising that many 
languages' RNGs are poor. Much of 
the best research is very recent, 
conducted after some of these 
generators were written. Simulations 
require a great deal of computer time. 
They were not of general interest until 
computer time became very 
affordable. 



produce every number between and 
m-1 before the sequence starts to repeat 
itself. Eventually, no matter what a, c 
and m are, the series must repeat. How 
long it goes without repetition is called 
the period and the longest period that 
you can get with a congruential 
generator is m. For many reasons, the 
longer the period, the better the 
generator. 

The second factor involved in 
choosing m involves computational 
convenience. As defined above, our 
RNG produces integers. To obtain 
fractions between and 1, just divide 
these integers by m. Applesoft reserves 
32 bits for the digits of any number. If 
we used m = 2^^, our sequence from 
to m- 1 would include every bit pattern 
than can be stored for a number. In 
general, since we are dealing with a 
binary computer, so numbers are stored 
as bit patterns, m should be a power of 
2. 

Unfortunately, m = 2^^ will not 
yield every fraction that the Apple can 
store, because Applesoft uses an extra 
byte per number to hold the exponent. 
This allows representation of billions 
of different very small numbers, 
including numbers near 10-^*. Working 
with fractions of the form R[N]23^, we 
can produce only one number in this 
region, namely zero. Tiny fractions in 
floating point languages are always 
under-represented by congruential 



generators: many fractions that the 
language can work with cannot be 
generated. We can alleviate the 
problem somewhat, and increase the 
period, by increasing m to 2"°. Not 
every possible fraction will be 
generated with this m -- RjN] would 
have to be 1 7 bytes long for that and the 
RNG would be very slow - but when m 
is 2"°, R[N| can take on 
1,099,511,627,776 different values, 
which is plenty. This is the value we 
use. 

Our next decisions involve a and c 
and these are more difficult. It is easy 
to find values of a and c that allow the 
period to be m. If a mod 4 = 1 and c is 
any odd number, the period will be 2"° 
(i.e. mj. But this is only part of the 
story. 

As an absolutely awful example of a 
full period mixed linear congruential 
generator, suppose that a is 1 and c is 
also 1 . So our generator is defined by 

R[N+1] = (R[N] +1) modulo m 

It works in the sense that we will 
indeed get all the numbers between 
and m-1, but the sequence is 0, 1, 2, 3, 
etc., and this is hardly random. 

The apparent randomness of a 
sequence of numbers is determined by 
the ordering of the numbers. This is 
where most RNGs, including all linear 
congruential generators, have at least 
some problems. 
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Figure 1 

Linear patterning of successive pairs of numbers obtained from linear con- 
gruential random number generators. A good generator spreads the points 
across more lines, yielding as few as possible on each line. Nonlinear soft- 
ware generators exhibit nonlinear patterns In graphs of this type but the 
patterns are just as pronounced. 
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We can think about the ordering 
problem by thinking about short 
subsequences of the form (R[I], R[I1]; 
R[I2j, ..., R[IK1). Consider pairs first. 
There are m^ possible pairs of numbers, 
[R(I], R[I11), between and m-1 but a 
generator of period m can only yield m 
different pairs. Which m pairs is the 
critical question. 

In the case of R[I1] R[I] 1, a graph of 
R[I] along one axis and Rfll] along the 
other would show a single straight line. 

A truly random sample of m 
numbers from the possible m^ would 
result in points scattered all over the 
graph. 

All linear congruential generators 
will produce graphs which show 
patterning, and that patterning will 
always be a set of parallel lines (see 
Figure 1). The trick is to find a 
generator which produces as many of 
these lines as possible, with as few 
points on each line as possible. The 
result will be a more even coverage of 
the m^ possible pairs. 

Note, by the way, that the larger m 
is, the more lines we can have and the 
closer they will be. The shorter the 
period, the poorer the generator. 

A two dimensional graph, with R[I] 
on one axis and R[Ill on the other, is 
graph of a plane. A one-dimensional 
graph is simply a line. A three- 
dimensional graph, of a cube, contains 
planes just as a two-dimensional graph 
contains lines. If we plot sequences of 
three pseudo-random numbers, (R[IJ, 
R[Ilj, R[I2]), on a cube, all of the points 
will fall on parallel plane and all of the 
points on each plane will be on parallel 
lines. In this case, only m of a possible 
m^ triplets can be produced by the 
RNG, so coverage of the cube is even 
more sparse than coverage of the plane 
in the two dimensional graph. The 
problem of patterning of triples is 
potentially more severe than patterning 
of pairs. In higher dimensions (longer 
sequences), we find parallel 
hyperplanes, and sparser and sparser 
coverage of the space. 

We call this problem of patterning 
of linear congruential generators the 
lines and planes problem. Our goal is to 
minimize it. The more lines, planes, 
and hyperplanes we can cause our RNG 
to generate, the fewer the points on any 
given line, plane, etc., and the less 
patterning there is. In a truly random 
sequence, there is no patterning, and 
this is what we want to approximate 
with our pseudo-random sequence. 

(If you are intrigued by this 
discussion but a little lost, George 



Marsaglia's chapter in the 
Encyclopedia of Computer Science is 
excellent and quite readable. Knuth's 
discussion of random numbers also 
deals with this problem at great length, 
with numerical examples and 
exercises. It is more technical, but in 
our opinion it is the best source 
available. For references to the original 
research, see Knuth) . 

The value of the RNG multiplier, a, 
is the main determinant of the degree 
of serial patterning. We want to choose 
a so as to produce as many lines and 
planes as possible, and to space them 
out as evenly as possible. This can be 
translated into the goal of minimizing 
the maximum distance between any 
two lines (planes, hyperplanes, etc.). 
Let 1/V2 be the maximum distance 
between any adjacent lines in a graph 
(such as Figure 1) of R[I1] against R[I]. 
Let 1/V3 be the largest distance 
between pairs of parallel planes in the 
graph of triplets (R[I], R[I1], R[I-2]), and 
so on. Our goal is to maximize V2, V3, 
V4, V5 and V6. (Note that these V's are 
inverses. The bigger the V, the smaller 
the largest distance between lines or 
planes in the graphs). We stop at 6 
because if these values are good, higher 
dimensional sequential interactions are 
almost certainly unimportant. 
According to Knuth, we would be 
pretty safe stopping at 4. 

The V values for linear congruential 
generators can be determined using a 
method first proposed by Coveyou and 
McPherson in 1965, which is based on 
the finite Fourier transform. The 
mathematics underlying this test, the 
Spectral Test of an RNG, are beyond 
the scope of this article, but they are 
well described by Knuth. The Fourier 
transform itself is a mathematical 
technique for detecting and describing 
repeating patterns in a set of data. 

To compute the values of the V's, 
we used Knuth's Algorithm S, which 
requires high precision Integer 
arithmetic. Apple's Pascal provides 
Long Integer type variables, which 
allowed us the Integer precision we 
needed. (We do not list this program 
because it is a direct implementation of 
Knuth's algorithm Sj. The algorithm 
takes only a and m as input - the value 
of c is irrelevant. It quickly determines 
the values of the V's for the output of 
the generator across its entire period. 

This is so spectacular that we want 
to say it again. The statistics V2, V3, 
and so on, which take only minutes to 
calculate, take into account the 
ordering of every one of the 



1,099,511,627,776 different values the 
random number generator produces. (!) 

Until the theorems behind this 
amazingly powerful algorithm were 
proved, testing of random number 
generators was done by examining a 
relatively "small" subset of the 
sequence the generator produced. 
"Small" here means maybe a million 
numbers. On an Apple, this type of 
testing can take months of computer 
time. (We report some subsequence 
tests below, and they took days. Tests 
of other generators not discussed here 
actually did take months). One of the 
reasons that old generators are so poor, 
relatively speaking, is that it took so 
long to test one. Testing of 
replacements was a tedious and very 
expensive business. 

To choose the multipliers for the 
three generators we present here, we 
computed V values for just over 30,000 
different values of a. (A life's work for 
at least 100 long-lived Apples if they 
were all tested in the old ways, and this 
only took two weeks). We stopped 
when three suitable values of a were 
found. 

The values of the V's tell us what 
the largest distance is between a pair of 
lines, planes or hyperplanes in a sub- 
sequence graph of the entire period. 
These values depend on the period of 
the generator: the larger m is, the 
larger V can be. These numbers can get 
so large (see Table 1) that it's very hard 
to tell whether a value of V is good or 
not. For any given period, there is a best 
possible value for each of the V's. The 
easiest way to tell how a given V value 
rates is to convert to a different number 
[call it U), that takes the period of the 
generator into account. Knuth gives 
formulas for converting from V2 to U2, 
V3 to U3, ..., V6 to U6. The Spectral 
test is usually defined in terms of the U 
values. If U is greater than 0.10, the 
generator "passes" the test. According 
to Knuth, every generator known to be 
bad fails the test at this level. He 
defines a "pass with flying colors" as a 
value of U greater than 1.0. 

The Spectral test is the most 
powerful test known of random 
number generators. The U and V values 
should be part of the documentation of 
any RNG. We list the values of the 
three generators presented here in 
Table 1. Our smallest U is 2.37. 

For comparison, the U values of 
RANDU, a very common RNG on 
32-bit mainframes, are 3.14 (U2), less 
than 0.0001 (U3), less than 0.001 (U4), 
less than 0.01 (U5) and 0.02 [U6). 
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Generator 



Table 1 
Results of the Spectral Tests 

X USR(1) YUSR(0) 



Z USR(-1) 



Multiplier 



27182819621 



8413453205 



31415938565 



Additive 
Constant 



99991 



26407 



V2 

V3 
V4 

V5 
V6 



U2 
US 
U4 
U5 
U6 



982974962600 


1112748837514 


908473954394 


72937326 


103184754 


79566866 


1023550 


805970 


1036504 


58786 


60670 


59710 


9916 


8142 


11636 


2.81 


3.18 


2.60 


2.37 


3.99 


2.70 


4.70 


2.91 


4.82 


4.01 


4.34 


4.17 


4.58 


2.54 


7.40 



Knuth (pp. 102-104] provides a table 
of U and V values for many mainframe 
generators. Most (fortunately) are 
better than RANDU. Some are better 
than the three we are presenting here, 
but not many of them. 

The problem with many of the older 
generators is that they were speed- 
optimized. A full period is obtained 
from any generator whose c is odd and 
whose a is any even power of 2, plus 1. 
These are not the only full-period 
multipliers (far from it), but if you 
choose a so that it is a power of 2, plus 
1, all that you have to do in the 
multiplication is to shift the 
accumulator a few times (the 
multiplication degenerates into a 
simple set of shifts), and then add. 

As an example of a fast generator, if 
you choose a = 2* -^ 1 and a 32-bit 
generator, as was recommended for the 
Apple not too long ago by someone 
else, you don't even need to shift 
anything. Add the lowest byte to the 
second lowest. Add the (8-bit plus 
carry) sum of these to the third lowest 
byte. Add the (8-bit plus carry) sum of 
these to the high byte and you are done. 
This is short, sweet, elegant, very fast, 
it passes some of the sub-sequence 
tests, but it fares badly on the Spectral 



test and it would probably be 
inadequate for many applications. 

We aren't going to say who 
suggested this generator, or in what 
magazine, because it could needlessly 
embarrass an author who doesn't 
deserve to be embarrassed. He 
consulted a standard, fairly recent 
(1971), and well written text on 
random numbers (Newman & Odell's, 
The Generation of Random Variates), 
followed their recommendations, and 
conducted their tests. Unfortunately, 
the importance of the lines and planes 
problem wasn't widely enough or fully 
enough realized in 1971, and the full- 
period tests, many of which had not yet 
been developed or polished, were not 
widely enough appreciated. Newman 
and Odell's otherwise very good 
summary of generation techniques and 
applications of random numbers made 
virtually no mention of full-period 
results. Their recommendations 
favored multipliers with few bits set, 
such as 2'-(-l or 2' -(-3. Similarly, 
Abramowitz and Stegun's numerical 
bible (also known as the Handbook of 
Mathematical Functions, 1964) 
recommends generators of the power of 
2 plus 1 type. Finally, and in another 
book deserving a home on any 



programmer's bookshelf, Camahan, 
Luther and Wilkes' Applied Numerical 
Methods (1969) makes much the same 
recommendation . 

The very fast generators, with few 
bits set to allow jazzed-up 
multiplication routines, have generally 
fared badly when subjected to the 
Spectral test. RANDU, for example, 
used a multiplier of 2" -(-3. The 
problem seems to be that so few bits are 
set, and so few operations are thus 
performed on the number, that the 
number's digits are not sufficiently 
scrambled each time. In the 1950's and 
early 1960's, generators of this type 
were considered ideal, rather than poor. 
They passed many of the simpler tests 
of randomness. And, critical for large 
simulations then, fast meant 
[relatively) cheap. (We keep talking 
about cost. Here's an illustration that 
makes the point. In 1978-79, Kaner and 
John C. Lyons conducted a moderately 
large simulation of the behavior of the 
Kolmogorov-Smirnov and related 
statistics, using three PDP-11 lab 
minicomputer. Some tests of the 
validity of their work required greater 
numerical precision than was easily 
obtained on the PDP's, so they also did 
some work on a CDC 6400 mainframe. 
Out of curiosity, they ran benchmark 
tests to determine how much the 
simulation would have cost if all of the 
work had been done on the CDC. It 
would have cost over $100,000, or 
more than enough, at that time, to but 
three well equipped PDF- 11 's). 

The recognition that tests of 
sequential patterning are more 
important than tests of frequency 
(discussed below) for generators that 
produce all possible numbers between 
and m, and the discovery of fast 
techniques to search for patterns across 
the entire period, have caused 
something of a revolution in the way 
RNG's are created and tested. Almost 
all of this has taken place over the last 
20 years, and much more has yet to 
come. 

Readers familiar with statistical 
techniques may have grumbled, by this 
point, that there were tests of 
sequential patterning long before the 
Spectral test. We will mention the 
results of a few of these below, but one 
of them, the Serial Test, is relevant 
here. 

Suppose that you split the range of 
fractions generated (R(N|m) into 10 
equal subranges, to .10, .10 to .20, .20 
to .30 and so on. If you generate a 
sample of 10,000 numbers, you can 



No. 72 • June 1984 



MICRO 



29 



count how many fall in each subrange. 
A random source would produce about 
1000 for each, and this can be compared 
to the number that the RNG produces. 
This simple test, of the frequency of 
single numbers [rather than of pairs or 
triples), is called the Chi-Square Test. 
Similarly, you can examine the pairs, 
(R[I], R[I1]). From a sample of 10,000, 
you should obtain approximately 100 
of each type of pair. That is, in about 
100 cases, both R[I] and R[Ilj should be 
between and .10. In another 100 
cases, R[l] should be less than .10 while 
R[I1] is between .10 and .20, and so on. 
There are 1000 types of triples (R|I|, 
R[Il], R(I2]) and on average we'd expect 
to obtain 10 of each. The traditional 
test used to examine the difference 
between the actual number of each 
number, pair, triple, etc. and the 
number that we should obtain on 
average is called the Serial Test. There 
are a number of versions. We prefer 
Good's, developed in 1953. [Knuth 
presents a different one that is also 
popular.) 

The Serial test is a subsequence 
test. You take a sample of the numbers 
produced by the generators (we used 
the first 850,000 from each in our tests, 
for example). If you didn't mind tying 
up your Apple for a few years you could 
test the entire output of the RNG (all 
trillion-plus numbers), obtaining a full- 
period test the hard way. For such a 
large sample, this test is known to be 
extremely sensitive to deviations from 
randomness. 

Over the last ten years, Neiderreiter 
has proved a very important set of 
theorems about the relationship 
between the Spectral test and the full- 
period Serial test (see Knuth for 
references and details). In short, any 
RNG that passes a full period Spectral 
test will also pass a full period Serial 
test. By using the Spectral test to 
determine the three values of a we 
ensured that the RNGs would pass both 
tests. 

We have now settled on values for 
m and a. How do we decide what c 
should be? The additive constant in the 
generator makes no difference for the 
Spectral test, but it does influence the 
value of another traditional test of 
ordering, the Serial Correlation Test. 
You can think of the serial correlation, 
lag K, as a measure of the degree to 
which the relationship between R[I] 
and R[IK| can be described as linear. A 
value of indicates that there is no 
linear relationship between the random 
number produced now by the RNG and 



the value that it will produce K calls 
from now. A value of ± 1 indicates a 
perfect linear relationship, and an 
atrocious RNG. 

I^uth's Theorem K gives a method 
to establish upper and lower bounds on 
the correlation, across the entire 
period. We applied it to test several 
additive constants, for each of the 
RNGs, for serial correlations lag 1 
through 20 (again in a Pascal program 
not listed here that followed Knuth 
directly). There were thus 60 
correlations, 20 for each generator. For 
the values of c chosen, the largest 
correlation lies somewhere between 
-0.00000001135 and 0.00000000569. 
The second worst case lies between 
-0.00000000038 and 0.00000000072. 
We don't know the exact values, just 
the upper and lower bonds on the 
correlations, but whatever they are 
they are pretty close to zero, which is 
where they should be. 

In summary, the modulus value of 
2*° resulted from a compromise 
between considerations of speed and 
space on the one had, and of period 
length and tiny value representation on 
the other. The critical full period tests 
from here were tests of sequential 
relationship. Equal frequency is, of 
course, a major criterion of 
randomness, but this entered into our 
parameter selection only insofar as 
values of a and c that would not 
guarantee equal frequency were 
rejected automatically. The parameter 
selection was determined, for each 
generator, by performance on the major 
full period tests of sequential 
relationship. 

Empirical Tests of the RNGs 

Full period tests only tell us about 
the performance of the RNG across the 
entire period. They do not guarantee 
that the sub-sequences will be good. It 
could be that a strong trend in the first 
100,000 values will be counterbalanced 
by a reverse trend in the next 100,000, 
and so on. Since no application that we 
know of would use the full trillion 
number period, the only way to be 
confident about quality for actual use is 
to examine the RNG's sub-sequence 
behavior. 

To do this, we ran a number of 
standard statistical tests on the output 
of each generator, examining the 
output in batches (sub-sequences) of 
1,000 to 10,000. For each test, 
sampling started at the (same) starting 
values of the generators. Many users 



will only need these first few hundred 
thousand numbers, so these should be 
the ones most carefully examined. 

1) Serial Tests 

We described these in the final 
discussion of the Spectral test, above. 
Samples of 10,000 numbers were tested 
for simple frequency [number of R[I]'s 
< .10, between .10 and .20, etc.) and 
for clustering of pairs and triples. 
Eighty-five batches were examined and 
the 85 results, for each test and each 
generator, were compared to the 
distribution of results we would expect 
from a random source, using the 
Kolmogorov-Smirnov Test. All three 
generators passed the simple frequency 
jp> .10) and triples [p> .20) tests. The 
generators listed as X and Y in Table 1 
passed the doublets test, but Z did not. 
The problem with Z, which we will see 
again later, is that it does too well on 
these tests. 

If you test a truly random source 
many times, it will sometimes fail a 
test of randomness and it will 
sometimes only marginally pass it. Not 
often, but sometimes, and we can 
calculate how often theoretically. Z's 
performance was sometimes poor, but 
not often enough to mimic a random 
source (.05 > p > .02). Since nothing 
can be "more randoni"than a "truly 
random' ' source, this must be a flaw in 
Z. 

It should be realized, though, that 
these tests are very sensitive to minor 
deviations from random source 
behavior when such huge (850,000) 
sample sizes are involved. Z does not 
perform ideally, but its performance is 
far from bad. 

2) Frequency Tests 

Equal frequency over the full period 
is guaranteed in a full period generator: 
one and only one of each number is 
produced each time through the trillion 
number series. But the fact that all 
possible numbers will eventually 
appear is no guarantee that they will 
come in a reasonable order. It all too 
often turns out that an RNG yields too 
few, then later too many small (large, 
whatever) numbers. We described the 
Chi-Square test of frequency as a 
special case of the Serial test. 
[Historically, the Serial was an 
extension of Chi-Square). A different 
test requires no grouping of the 
numbers and it is often more sensitive 
to departures from equal frequency 
than Chi-Square. This test, the 
Kolmogorov-Smirnov test (KS test for 
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short), compares the proportion of 
numbers generated that are less than 
any given number (across all numbers 
between and 1) with the proportion 
that we'd expect from a random source. 
A hundred such tests, for each 
generator, were run on batches of 1,000 
numbers, and the KS test was then used 
to compare the distribution of KS 
values from these 100 tests with the 
distribution a truly random source 
would give. X and Y passed (p > .20). Z 
failed, even though it had already 
passed Chi-Square. The problem with 
Z, as before, was that its test 
performance was too good, too often 
(.05 > p> .02). This is a most unusual 
problem for an RNG, but searching 
techniques for "terrific" generators, 
like the search we performed across 
30,000 potential generators, are 
becoming commonplace, so we can 
expect this to arise more often. 

3) Runs Tests 

A run up is a succession of 
increasing numbers (eg. .1, .2, .35, .36) 
which ends when the next number 
generated is lower than the last. A run 
down is similar. In this case, 
successive numbers get smaller. The 
number of increasing or decreasing 
numbers in a run is the length of the 
run. Tests of how many runs, and how 
many runs of each length, are further 
tests of sequential trend in the RNG. 
Both types of tests were run, for each 
generator, on a sample of 50,000 
numbers. All generators passed them 
handily. 

4) Other Tests 

We developed these generators two 
years ago (summer, 1981) and have 
used them often since. Kaner has 
mainly used them to simulate logistic, 
triangular, normal, and geometric 
distributions, and the behavior of 
various functions of variables having 
these distributions (such as the 
kurtosis of weighted sums of a logistic 
plus a triangular plus a geometric, 
which is an important variable in a 
theory of time perception that he works 
with). Z was never used in these 
simulations. X and Y performed quite 
adequately. Numerous comparisons of 
theoretically predictable values with 
the simulation results were made along 
the way, and none of the comparisons 
suggested any problems with the 
RNGs. 

Vokey has conducted simulations 
involving binomial, t, F, and various 
other distributions of common 



hypothesis testing statistics, and of 
multinomial and hypergeometric 
distributions and functions of these 
involved in theories of choice and 
category learning. X and Y have 
performed well consistently. Z has 
performed strangely: extreme values of 
complex statistics are not as likely as 
they should be with Z. 

In sum, X and Y have passed all 
tests, theoretical (full period] and 
empirical (sub-sequence). Z's sub- 
sequence behavior has been less good 
(i.e., too good), and the more of it that 
we see, the more hesitant we are to use 
it again as a "stand-alone" RNG. This 
does not mean it's useless, as we shall 
see below. 

X and Y appear sufficiently random 
for most needs, and they have 
performed empirically beyond our 
iaopes for them. But they are not 
perfect. We have minimized the lines 
and planes problem, but we have not 
gotten rid of it. For very precise 
simulations, especially of events 
correlated over time, this is not go 
enough. However, if more than one 
RNG is available (which is why we 
provide three), we can do much better 
than we have done so far. 

Combination of RNGs 

The graph of the last number 
generated, R[N], against the number 
generated this time, R[N 1], shows a 
family of parallel lines when all pairs 
(R[Nj, R[N1]) are plotted (as illustrated 
in Figure 1). This is the parallel lines 
problem. If our goal is to break down 
this linear structure, as we must do to 
mimic the random structure produced 
by a truly random source, why not just 
randomly rearrange the order of the 
numbers generated by the RNG, as it 
produces them? This is George 
Marsaglia's insight, and in practice it 
works out very well. 

Here's an example of the procedure 
for wiping out the lines and planes 
patterns. Generate 100 values from X 
and store them in a matrix, say 
XRAN[I]. Now sample a value from 
generator Y and use this value to 
determine which value you'll choose 
this time from XRAN, i.e. set 
RANDOM XRAN[Y * 100]. Replace 
the sampled value of XRAN with a new 
value from generator X (XRAN[Y *' 100] 
USR (1)) and you're done. 

A sequence of numbers, RANDOM 
[I], will have the same good sub- 
sequence frequency properties as X 
does, but the last remnants of 



sequential patterning from X typically 
disapper. Knuth gives examples of 
quite poor generators which perform 
surprisingly well when combined in 
this way. All combinations that we've 
examined in X, Y and Z have been 
good, but we recommend that Z be 
restricted to the role of selection 
generator (the role played by Y in the 
example above) due to its too equal 
sub-sequence frequencies. We see no 
problem in using Z as a selection 
generator. Some people would argue 
that Z might be a better selection 
generator than X or Y. We're not sure. 

A second approach is to sample 
from X, then Y, then Z, in turn. This 
triples the period and it can destroy the 
lower-dimensional patterns (the lines), 
but it will not do for all generators 
combined in this way. In fact, Lewis' 
Multi-RNG Theorem (pp. 18-19) states 
that if any multiplier in a bank of equal 
period RNG's is near sq.rt. m , the 
problem will return with a vengeance. 
(A sad result because the old generators 
were often chosen to be near sq.rt. m 
deliberately, and the older texts 
recommend this heartily). We 
restricted selection of multipliers for X, 
Y and Z to values far from sq.rt. m = 
1,048,576 in order to allow this form of 
generator combination. For these 
generators, according to Lewis, the 
technique should be very effective. 

The last approach that we'll 
mention is to use one generator (Z) to 
decide which of the other two will be 
sampled from this time. This only 
doubles the period of the resulting 
generator (if you need 3 trillion 
numbers, use a different RNG), but it 
does randomize the order of sampling 
from the generators, which is not done 
above. 

It seems probably important for 
each solution above that the different 
generators' outputs be unrelated. 
Otherwise, replacing a value of X with 
one from Y, for example might make 
little difference. Our final test of the 
generators involved computing the 
correlation (measure of linear 
relationship) between X and Y, Z and Y 
and Z. A hundred correlations were 
taken, on samples of 1,000 numbers 
per generator. All were reasonably low. 
The averages were 0.0003 for X and Y, 
0.0038 for X and Z, and -0.0017 for Y 
and Z, which should be low enough to 
allow combinations. 

Using the RNG 

Once you have entered the RNG 
program into your Apple (below), you 
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access it via the USR function. A 
statement of the form 

RAN USR (SELECT) 

in either immediate or deferred mode, 
will put a random number into the 
variable RAN. SELECT must be a Real 
or Integer number, variable or 
expression. If it is less than 0, the 
output will be from Z. If SELECT is 0, 
the output is from Y. If SELECT is 
larger than 0, output is from X. If 
SELECT is a String, output is "7SYNTAX 
ERROR". 

Some of the locations of the 
program hold the last values generated 
by each RNG. Unless you are 
debugging a program and want the 
same number sequence again and again 
(in which case, see below), you should 
never use the same random numbers 
twice. If you never have to reload the 
program, this is taken care of 
automatically. However, if you must 
reload the program, it will start from 
the initial values of 3, 99991 and 
26407. It is easy to avoid this problem 
by always updating your copy of the 
program on the disk. At the end of 
every program that uses an RNG, we 
PEEK the contents of decimal locations 
768 to 969 |the entire program) and 
save them on the disk. (Equivalently, 
BSAVE RNG, A$300, L$C9). At the 
start of every RNG-using program, we 
BLOAD the program from the disk. 
This ensures that we always start with 
the next random number in the 
sequence. 

To obtain a standard sequence 
instead, keep another copy of the RNG 
program, and deposit it into core as 
needed, but never update it. This 
downloads the same values every time, 
yielding the same sequence every time. 

The RNG Program 

The program starts by determining 
which generator is requested, and does 
so by calling Applesoft's internal SIGN 
subroutine. Variable LOOKUP holds 
the offset value, determined from the 
sign variable in USRi), which, when 
added to ADDBAS, yields the final 
location of XADD (LOOKUP = $22), 
YADD($13) or ZADD ($04). These are 
the additive constants, c, of the 
generators and the final locations are 
used because our DO loops are most 
conveniently done as 4 DOWNTO 0. 

LOOKUP added to MULBAS 
(multiplier base address) yields 
XMULT, YMULT or ZMULT, the 
values of a. 

LOOKUP + LSTBAS points to the 
last value generated from X, Y or Z, 



XRAN, YRAN or ZRAN, i.e. to the R[N1 
ofR[N+l] = (aR[Nl + c) mod m. 

By loading the appropriate value of 
LOOKUP into Che computer's Y 
register, we access the appropriate 
RNG. To avoid constantly worrying 
about which generator we are dealing 
with, we store the values in a set of 
standard locations (freeing register Y 
for other uses). 

NEWRAN will hold the new value 
generated. By depositing c into it 
directly, we perform the addition of c 
automatically. MULT and OLDRAN 
hold a and RIN] . This is the function of 
the program segment labelled TRNSFR. 

The next section of the program 
thoroughly confuses readers unfamiliar 
with modular arithmetic. Remember 
that the value of A mod B is the value of 
the remainder of the division of A by B. 
The quotient itself is irrelevant. Since 
2*° will divide evenly into any multiple 
of 2*°, any number greater than 5 bytes 
in length reduces to the least 
significant 5 bytes (40 bits) directly. 
Every bit more significant than the 
40th (or 39th if you number from 0) is 
an even multiple of 2*° so it cannot 
enter into the remainder of the 
division. Combine this with the fact 
that 

(AB) mod C (A mod C B mod C) mod C 

and you will see that we never need any 
bits past the 40th. Thus we never store 
them. The multiplication segment 
calculates the least significant 40 
binary digits and quits. The additions 
always ignore the carry from the sum of 
the highest bytes. 

The multiplication algorithm is the 
same as the one we all learned in 
elementary school. Here is an example 
of standard multiplication: 

123^^5 OLDRAN 
X 11111 MULT 

12345 
1 23 'i 5 
12 3^^ 5 
123 'i 5 

123 '^ 5 

137165295 PROD 

To multiply OLDRAN by MULT, 
we multiply by the least significant 
digit of MULT, shift OLDRAN left by 
one, multiply the next least significant 
digit, shift again, etc. If MULT held a 
zero at any point, we would shift 
OLDRAN for the next digit of MULT, 
but not add anything to the answer, 
PROD. In the RNG program, we do it 
the same way, with register Y keeping 
track of the bits of the byte of MULT by 



which we are currently multiplying. 
Index X and BYTCNT keep track of 
MULT's byte. The difference between 
our algorithm and the traditional one is 
indicated by the vertical line in the 
example. We need no digits past the 
line, so we never calculate anything 
past it. 

The third section of code, 
MOVRAN, is executed after the 
multiplication and the addition are 
done. We now have R[N +1], which we 
store as is in XRAN, YRAN or ZRAN. 
Which generator it goes back to is kept 
track of by XYORZ. R[N+ 1] is always 
stored as a fixed-point integer, because 
all computations are and always should 
be fixed-point integer for the modulo 
operation to work. Why store a 
normalized value and have to decode it 

each time? 

(Note Bene: We now know of three 
cases in which programmers have 
''improved" on congruential 
generators by doing floating point 
computations rather than fixed integer 
computations. More precision is better, 
right? Wrong! Not here! The theorems 
we reference above all assume fixed- 
point integer arithmetic, with 
truncation not rounding. The 
computational errors involved in 
integer arithmetic are part of the 
algorithm. Maybe floating point 
calculations will be good for some 
generators, but this is uncharted 
territory. In our experience, this 
"improvement" has always led to a 
bad generator) . 

NRMLIZ puts NEWRAN into the 
floating-point format that Applesoft 
expects. To convert fixed-point to 
floating-point, left-rotate the number 
until its most significant digit (the first 
set bit) is the leading bit of the number. 
As long as we keep track of the number 
of rotations performed (held in register 
Y), we could convert back to fixed 
point easily if we wanted to. Floating- 
point format, which stores an exponent 
(reflecting the number of rotations) 
along with the normalized digits, 
allows a wider range of values to be 
stored to high precision than does 
fixed-point format. 

Once normalization is done, we 
either branch to BITSET if a set bit 
(most significant digit) was found, or 
fall through to it if RIN] = 0. At 
BITSET we first load a into a byte 
reserved to hold the number's sign 
(making it positive], then convert to 
Apple's convention for storing 
exponents. In this format, if the 
exponent is $80, no rotations were 
required and the number lies between 
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0.999999999 and 0.50. If the exponent 
is $70, one rotation was done and the 
number lies between 0.5 and 0.25, and 
so on. 

To store our integer as a fraction, 
we need only load the exponent with a 
value no greater than $80, and less than 
$80 by the number of rotations needed 
to get the top set bit. This is exactly 
equivalent to dividing R[N+ 1] by 2*°, 
except where R[N + 1] is 0. In this case, 
the program returns 2*' instead of zero. 
This is close to zero but it removes the 
chance of a "?DIVISION BY ZERO" 
error if you divide by a random value. 
This is probably academic anyway, as 
the starting values ensure that will be 
the 1,099,511,627,776th number 
generated by each RNG. 

Below are the parameters for the 
Apple, Commodore, and essentially 
any other 6502 machine that uses a 
Microsoft BASIC. See Editor's Note, 
Page 34. 

APPLE - to set up the USR function 
- POKE 10,76: POKE 11,61: POKE 12,3 
(These would be altered if you are 
starting the program elsewhere in 
Memory.) 

$9D 

$9D 

$9E 

$AC 

$EB82 

COMMODORE - to set up the USR 
hmction - POKE 785 and 786 with 
address of RNG Subroutine. 
MULTMP EQU $61 
EQU |6l 
EQU $62 
EQU $02 



MULTMP 


EQU 


RANEXP 


EQU 


NEWRAN 


EQU 


BYTCNT 


EQU 


SIGN 


EQU 



RANEXP 
NEWRAN 
BYTCNT 



SIGN - see below 
FEXP EQU $61 

FSGN EQU FEXP+5 

The following is the Applesoft sign 
routine converted to a form for the 
Commodore. In line 0344 of the main 
program there is a JSR to SIGN. The 
location $EB82 is where the sign 
routine is located in the Apple. For the 
Commodore you can place the SIGN 
subroutine anywhere as it is 
completely relocatable. 

Floating Point Exponent - FEXP 
Floating Point Sign - FSIGN 
06-4: FEXP EQU |6l 

FSIGN EQU $66 
APPLE: FEXP EQU |9D 

FSIGN EQU $A2 
A5 61 SIGN LDA FEXP 



F0 09 




BEQ RTN 


A5 66 




LDA FSGN 


2A 




ROL A 


A9 FF 




LDA $FF 


B0 02 




BOS RTN 


A9 01 




LDA $01 


60 


RTN 


RTS 


No. 72 ■ 


June 


1984 



Listing 1 



0300 






ORG $300 


0300 


************************************* 


0300 


» 




* 


0300 


# 


A 


BETTER RANDOM NUMBER GENERATOR * 


0300 


* 




FOR APPLESOFT * 


0300 


* 




* 


0300 


* 




COPYRIGHT 1984 * 


0300 


* 




THE COMPUTERIST INC. * 


0300 


* 




ALL RIGHTS RESERVED * 


0300 


* 




» 


0300 


»*»»****»»**»»****»*»»*****^t*»»*»**** 



© 



0300 00 00 00 
0305 07 50 89 
030A 00 00 00 



030F 00 00 01 
0314 01 F5 7B 
0319 00 00 00 



03 IE 00 00 00 
0323 06 54 38 
0328 00 00 00 



032D 04 13 22 



0330 00 

0331 00 

0332 00 

0333 00 
0338 00 



TO USE THE RNG SUBROUTINE, YOU MUST 
SET UP THE USR FUNCTION. 
SEE EDITORIAL NOTE 

LOAD IN PARAMETERS FOR THE RNG'S 

Z: RAN(3l4l5938565*OLD24607)MOD20 

ZADD BYT $00, $00, $00, $67, $27 

ZMULT BYT $07,$50,$89,$2E,$05 

ZRAN BYT $00, $00, $00, $00, $00 

; Y: RAN(84l3453205*OLD9999l)MOD20 

YADD BYT $00, $00, $01, $86, $97 

YMULT BYT $01,$F5,$7B,$1B,$95 

YRAN BYT $00, $00, $00, $00, $00 

; X: RAN (27182819621*OLD3)MOD20 

'xADD BYT $00, $00, $00, $00, $03 
XMULT BYT $06,$54,$38,$E9,$25 
XRAN BYT $00, $00, $00, $00, $00 
; ADD LOOKUP TO BASE LOGS FOR 
; PARAMETER ADDRESSES FOR CURRENT RNG. 
LOOKUP BYT $04, $13, $22 ; Z, Y, X 



© 







© 



00 00 



033D 08 
033E 8E 32 03 
0341 8C 31 03 
0344 20 82 EB 



XYORZ 

YTEMP 

XTEMP 

MULT 

OLDRAN 

RNG 



BYT $00 

BYT $00 

BYT $00 

BYT $00, $00, $00, $00, $00 

BYT $00, $00, $00, $00, $00 



WHICH GENERATOR 
Y-REG ON ENTRY 
X-REG ON ENTRY 



PHP 

STX XTEMP 
STY YTEMP 
JSR SIGN 



0347 AA 


TAX 


0348 E8 


INX 


0349 BC 2D 03 


LDY LOOKUP, X 


034C 80 30 03 


STY XYORZ 



SAVE EVERYTHING 



SEE EDITOR'S NOTE FOR 

SIGN ROUTINE 

FAC HOLDS S OF USR{S)® 
PUT FF IN A IF S0, 
PUT IF 0, 1 IF S0 

FROM THIS Q 

DECIDE WHICH RNG 

VIA LOOKUP TABLE AND 

SAVE IT FOR LATER 



034F A2 04 
0351 B9 00 03 

0354 95 9E 
0356 B9 05 03 
0359 9D 33 03 
03% B9 0A 03 
03 5F 9D 38 03 

0362 88 

0363 CA 



NOW THAT WE KNOW WHICH GENERATOR, MOVE 
ITS CONSTANTS TO THE TEMP LOGS. 



TRNSFR 



LDX $04 

LDA ADDBAS,Y 

STA NEWRAN, X 
LDA MULBAS,Y 
STA MULT,X 
LDA LSTBAS,Y 
STA OLDRAN, X 
DEY 
DEX 



LOOP TO TRANSFER 
RNG'S VALS TO 

STANDARD LOGS, I.E. 
ADD CONST TO NEWRAN, 
MULT CONST 
TO MULT, 

LAST RND VAL FROM 
THIS RNG TO OLDRAN 

5 BYTES DONE 
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036-; 10 EB 



BPL TMSFR 



IF NO, DO NEXT 
IF YES, MULTIPLY. 





0366 A2 0A 


LDX $0-; 


INDEX OF BYTES 




0368 86 AC 


STX 


BYTCNT 


KEEP TRACK OF BYTES 


m 


f 






DEALT WITH SO FAR 




036k BD 33 03 NXTBYT 


LDA 


MULT.X 


LEAST SIGNIF BYTE 




036D 85 9D 


STA MULTMP 






036F A0 07 


LDY $07 ; 


COUNT BITS 


© 


0371 ^6 9D MULPLY 


LSR 


MULTMP 


GET LEAST SIG BIT. 




0373 90 0C 


BCC 


SHIFT 


BIT0 DON'T ADD. 




0375 18 


CLC 




BIT SET, SO ADD 


© 


0376 BD 38 03 ADD 


LDA 


OLDRAN,X 


OLDRAN TO NEWRAN. 


0379 75 9E 


ADC 


NEWRAN,X 






037B 95 9E 


STA 


NEWRAN,X 






037D CA 


DEX 




ALL BYTES DONE 


© 


037E 10 F6 


BPL 


ADD 


NO ADD NEXT 




0380 18 


CLC 




YES, SO PREPARE TO 










SHIFT OLDRAN (IE 


o 








MULT » 2) . DROP LAST 








CARRY AS IT IS 










MOD20 ANYWAY. 




0381 A6 AC SHIFT 


LDX 


BYTCNT 


BYTES TO SHIFT 


o 


0383 3E 38 03 SHFTIT 


ROL 


OLDRAN.X 






0386 CA 


DEX 




BYTE LEFT 




0387 10 FA 


BPL 


SHFTIT 


YES, SHIFT IT. 




0389 A6 AC 


LDX 


BYTCNT 


RECOVER BYTES. 


o 


038B 88 


DEY 




MORE BITS LEFT 
IN THIS BYTE 




038C 10 E3 


BPL 


MULPLY 


YES, MULT BY NEXT. 


o 


038E C6 AC 


DEC 


BYTCNT 


NO, DONE A BYTE. 


0390 A6 AC 


LDX 


BYTCNT 


ANY BYTES LEFT 




0392 10 D6 


BPL 


NXTBYT 


YES MULT BY IT. 


o 


039-^ AC 30 03 


LDY XYORZ 


DONE. PUT THE 




0397 A2 0A 


LDX $0-; ; 


NEW RND INTO THE 




; RESPECTIVE RNG'S 










039B 99 0A 03 


STA 


LSTBAS,Y 


LAST RAN STORAGE. 


o 


039E 88 


DEY 








039F CA 


DEX 


J 


MORE TO MOVE 




03A0 10 F7 '. DONE. 


NOW TC 


NORMALIZE 


FAC, ALIAS NEWRAN. 


o 


03A2 A0 28 


LDY $2 ; $28 (-^0) BITS IN FAC. 




03kA A5 9E NRMLIZ 


LDA 


NEWRAN ; 


FIND HIGHEST SET. 




03A6 2A 


ROL 


f 


SIGNIFICANT 


o 


} 






28 - NOT SET 




03A7 B0 0E 


BCS 


BITSET ; 


LEAVE WHEN TOP 
BIT FOUND 


o 


03A9 26 A2 


ROL NEWRAN-i ; 


NOT FOUND YET, SO 


03AB 26 Al 


ROL NEWRAN3 ; 


GET RID OF THE 




03AD 26 A0 


ROL 


NEWRAN2 ; 


BIT AT THE TOP. 




03AF 26 9F 


ROL 


NEWRANl ; 


Y WILL KEEP TRACK 


o 


03B1 26 9E 


ROL 


NEWRAN ; 


OF OF BITS LEFT. 




03B3 88 


DEY 




ANY LEFT 




03B'i D0 EE 


BNE 


NRMLIZ ; 


YES, KEEP LOOKING 





} 






NO, ALL DONE. 


03B6 88 


DEY 


t 


PROTECT AGAINST 




f 






DIVIDE BY 0. 




03B7 A9 00 BITSET 


LDA $00 ; 


PUT IN FAC'S 


o 


03B9 85 A2 


STA NEWRAN-i ; 


SIGN BYTE. 




03BB 98 


TYA 




GET SIG BITS 




03BC 18 


CLC 


i 


PUT IN FAC'S $80 




03BD 69 58 


ADC 


$58 ; 


FORMAT: $58$28$80. 


o 


03BF 85 9D 


STA 


RANEXP 


PUT IN EXPONENT 
BYTE AND DONE. 




03C1 AC 31 03 


LDY 


YTEMP 


SO, UNSAVE 


© 


03C'i AE 32 03 


LDX 


XTEMP 


EVERYTHING 


03C7 28 


PLP 


J 


AND 




03C8 60 


RTS 


i 


SAY GOODBYE. 




03 C9 


END 
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Editor's Note: When adapting this 
random number generator subroutine 
we found it to be essentially free from 
machine specific code. The two places 
the code differs are in the use of the 
USR function which accesses the 
program from a BASIC file, and in the 
use of floating point notation, in 
particular the APPLESOFT Sign 
routine. After examining the available 
documentation the USR function for 
the Apple and Commodore we found it 
wasn't clear as to how parameters were 
passed. The locations used were 
different, but this was expected. The 
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question was how the floating point 
notation operated. To solve this 
problem we wrote a small program (see 
below) which allowed us to display the 
floating point accumulator, PEEKing 
the locations where the exponent, 
mantissa and sign were stored in each 
computer. If they were stored 
differently, then further modifications 
would have to be made. Happily our 
little program proved that they store 
the parameters in the same form. Now 
for the bad news - we found the Atari 
didn't use floating point notation in its 
USR function. This, combined with a 
different convention for storing floating 
point notation (combining the 
exponent and the sign), made easy 
adaption of this program impossible. 
Certainly if those readers with Atari's 
wish to meet the challenge it can be 
done. Bear in mind the different USR 
function and the use of floating point 
notation in the RNG subroutine, and 
how it would have to be changed to 
accomodate the Atari's conventions. 

JNCRO 



10 REM PROGRAM TO DISPLAY FLOATING POINT 

ACCUMUUTOR 
20 UV10 : REM USER VECTOR 
30 PN3 : REM PAGE NUMBER 
A0 FA157 : REM FLOATING POINT ACCUMULATOR 
50 MPPN*256 : REM MEMORY PAGE 
60 POKE UV, 76: POKE UV1,00:POKE UV2,PN 
100 MPPN*256 : REM MEMORY PAGE 
110 POKE UV, 76: POKE UV1,00:POKE UV2,PN 
120 MVMP:SV128:I0 
130 POKE MV,165:P0KE MV1,FAI 
U0 POKE MV2, 1-^1 : POKE MV3,SV:P0KE mA,PN 
150 MVMV5:SVSV1:II1 
160 IF 16 THEN 130 
170 POKE MV,96 
200 INPUT VALUE ;A 
210 BUSR(A):PRINT VAL ;B 
220 PRINT EXP ;PEEK(MP128) 
230 PRINT MSB ;PEEK(MP129) 
240 PRINT ;PEEK(MP130) 

250 PRINT ;PEEK(MP131) 

260 PRINT LSB ; PEEK (MP 132) 
270 PRINT SIGN;PEEK(MP133) 
280 GOTO 200 



O 



o 



o 



o 
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C64-FORTH/79 

New and Improved 
for the Commodore 64 

C64-Forth/79'" for the Commodore 64-$99.95 

• New and improved FORTH- 79 implementation with 
extensions. 

• Extension package including lines, circles, scaling, 
windowing, mixed high res-character graphics and sprite 
graphics. 

• Fully compatible floating point package including 
arithmetic, relational, logical and transcendental functions. 

• String extensions including LEFTS, RIGHTS, and MID$. 

• Full feature screen editor and macro assembler. 

• Compatible with VIC peripherals including disks, data set, 
modem, printer and cartridge. 

• Expanded 167 page manual with examples and application 
screens. 

• "SAVE TURNKEY" normally allows application program 
distribution without licensing or royalties. 

(Commodore 64 is a trademark of Commodore) 

TO ORDER 

-Disk only. 

-Check, money order, bank card, COD's add Sl.6S 

-Add S4. 00 postage and handling in USA and Canada 

-Mass. orders add 5% sales tax 

-Foreign orders add 20% shipping and handling 

-Dealer inquiries welcome 

PERFORMANCE MICRO PRODUCTS 

770 Dedham Street ^^^ 

Canton, MA 02021 VISA 

(617) 828-1209 ^^^ 
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SOPHISTICATED TELE-COMMUNICATION IS HERE 

THE COMMUNICATOR 

for 4.0 Commodore Computers 

JIM STRASMA'S REVIEW: 

"THE BEST TERMINAL PACKAGE I'VE SEEN YET" 

By April 1 (maybe sooner) It Will Be Even Better 



TRUE 



SPEEDS UP TO 9600 BAUD 

XON — XOFF 

CTRL KEY (we do our own keyboard 



scan) 



THE HARDWARE — A printed circuit tioard; easily installed in the CBM. II uses 
no C8M connectors; gives a serial port with true RS232C standard. 

THE SOFTWARE — 

— Emulates the ADDS Regent 100, ADM 31 and/or the 

TeleVldeo 950.1 Or choose the VT100 model for use with DEC and VAX 
computers. 

— Runs coresident with BASIC programs; lets BASIC 

programs and program on host computer communicate to develop real- 
ly sophisticated communication and control capatsilities. 

— The program is on ROM at either address; no disK loading 

required. Uses only 51 2 trfles of RAM; will relocate itself around any other 
machine language program at top of memory. 

— Will upload and download and run BASIC programs. With BASIC 

program wiD upload and download standard data files. 1 00 page manual 
gives program listing for BASIC programs. 
Excellent text editor designed to work with 
THE COMMUNICATOR 
Text Editor $40 

1200 baud modems beginning at low, low $365, and even less when purchased 
with THE COIiilMUNICATOR 

AMPLIFY, INC. 
2325 Macbride, Iowa City, Iowa 52240 319-337-8378 

1 trademarks Adds Regent, Inc., Lear Liegler, Inc., Televideo Systems, inc. 
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CONTROL 



by Mitchell Esformes 



Test your assembly code for efficiency, or adapt 
the program for statistic, step/trace debugging 
and more. 



CONTROL is a machine language 
program that runs your machine 
language/assembly level program 
instruction-by-instruction and allows 
you to control its operation and/or 
collect statistics about your program. 
This could be used for as simple an 
application as counting cycles in a 
program [details shown in this 
example), as a step/trace function with 
disassembly of each instruction, as a 
sophisticated debugging tool that traps 
on specified instructions and/or 
memory locations, and so forth. 

The program works by setting up a 
pseudo program counter, fetching and 
evaluating each instruction from the 
program under control, performing any 
special operations that you define, and 
then executing the instruction. It is 
written in such a way that you can 
easily add your own processing 
routines. The demonstration process 
shown here simply counts the number 



of machine cycles used by a program. 
While this can be useful in developing 
optimally efficient code, it is only a 
hint of what can be done with this 
technique. CONTROL will run on any 
6502 microcomputer. The only 
requirements are four page zero 
locations and about IK of program 
space. 

Piogiam Description 

EQUATES: These are the addresses of 
locations used by the program for its 
program counter, table pointers and for 
saving the 6502 registers. PCTR is a 
two byte page zero vector which 
contains the pseudo program counter; 
TEMPLO and TEMPHI are a page zero 
pair of bytes used for vectoring to the 
CONTROL tables. The 6502 registers 
are saved in ACC (A reg), XREG, 
YREG, STREG [status) and STKPTR 
(stack pointer) . These do not have to be 



on page zero. TALLY is an eight byte 
table used to hold the cycle count in 
this particular example. If you design 
some other function for the CONTROL 
program, then this will not be needed. 
START puts the address of a location 
containing a BRK command, BREAK, 
on the stack to be used to halt the 
program when an RTI is encounted in 
the test program, sets the status to to 
enable interrupts, and clears the 
TALLY counter. If you are not counting 
cycles, the TALLY counter does not 
have to be cleared. 

FETCH is the beginning of the main 
processing loop. It picks up the first 
byte of the current instruction, the 
OPCODE, and converts it to the range 
$00 to $0F to speed up the table lookup. 
The table INSTl is searched for an 
OPCODE match. If found control goes 
to SERVICE. If an illegal opcode was 
fetched, then it goes to ERROR. 
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SERVICE indexes the CYCLE table to 
get specific information about the 
current opcode and then jumps to your 
custom test/ evaluate/ count routine. 
The OPCODE has been found. In this 
example, the routine ACCYC is used to 
count the cycles in the instruction 
being executed. 

PROCESS is the return point from the 
custom service routine. It starts the 
actual processing of the current 
istruction. If, as indicated by a plus 
value in the A reg (from the CYCLE 
table), the instruction can be directly 
executed, then the program goes to 
TRANSF which completes the 
instruction execution. 
SUB through FORWRD are the 
routines that service instructions that 
may not be directly executed. These are 
the instructions that modify the real 
program counter: JSR, JMP, JMP (X), 
RTS, RTI, and the conditional branches 
BEQ, BNE, BCC, BCS, BMI, BPL, BVC 
and BVS. Each of these instructions 
requires special processing to calculate 
the new program counter. This is 
handled by the various routines 
starting with SUB and ending with 
FORWRD. Once the new program 
counter has been calculated and set 
into PCTR then the instruction has 
effectively been executed! The program 
now goes back to FETCH for the next 
instruction at the new PC address. The 
call to subroutine OVER is specific to 
the TALLY cycle counting example and 
increments the count to reflect the 
extra cycle taken in crossing a page 
boundary. If your custom routine does 
not require special processing on page 
boundary crossings, then simply 
replace OVER with an RTS. 
TRANSF to EXBUF are the real 'guts' 
of this program. This is where all of the 
instructions, except for the JMPs and 
BRANCHes handled above, are 
processed. The CYCLES table contains 
important information about each 
instruction. This is in the form: 

Bit Use in Cycles 

01 Number of cycles 

02 used by the 
04 instruction 

08 Number of operand 
10 bytes in instruction 
20 If set add X reg to indexed address, 
else add Y reg 

40 If set check if page boundary 
crossed 

80 If set do not directly execute the 
opcode 



TRANSF moves the complete 

instruction to the three byte EXBUF 

and 

FILLED pads with NOP's if the 

instruction is less than three bytes 

long. 

POINT calculates the address of the 

next instruction. 

OVERPG checks for indexed 

instructions and branches to RUN if 

not indexed. 

SCAN2 checks for mode and branches 

to IND for indirect indexed mode. 

ADDY,ADDX service a simple index 

instruction by modifying the address in 

the EXBUF and then go to RUN. 

IND fixes up the address for the 

indirect indexed mode. 

RUN restores all of the registers that 

were saved on entry. 

EXBUF now contains the correct 

instruction to execute. It is executed 

and then drops through to the next code 

which saves all of the registers and then 

goes back to FETCH the next 

instruction. 

BREAK is a BRK command that is 

executed when CONTROL encounters 

an RTI instruction. This stops 

CONTROL and returns you to your 

microcomputer monitor. 



Tables 

TABIN contains index values into the 

main opcode table. This considerably 

speeds up the search for the correct 

opcode during execution. 

INSTl contains the values of all valid 

opcodes. 

CYCLES contains the significant 

information about each opcode as 

described in the table above. 

INST2 contains the value of all 

opcodes that require special service on 

page boundary crossovers. 

ADRMOD indicates the addressing 

mode for each of the opcodes in INST2. 

A $00 byte indicates Indirect Indexed; 

an $FF indicates Absolute Indexed. 

Utility Specific Routines 

ACCYC is the basic cycle counter 
mechanism used in the cycle counting 
utility. It simply adds the number of 
cycles for the current instruction to the 
TALLY counter, an eight byte counter. 
This is called by SERVICE. For your 
own utility, write code to service your 
requirements (disassembler, trace 
mode, or whatever) and have SERVICE 
jump to it. Return to the mainline 
program with a JMP PROCESS. 



OVER is an additional cycle counter 
used for page boundary crossovers that 
add one cycle to the instruction. If your 
utility does not need extra service for 
page boundaries, simply replace OVER 
with an RTS. 

ERROR is called when an invalid 
opcode is encountered or when the 
utility code detects an error. It can be as 
simple as a BRK to abort processing and 
return to the system monitor; it can 
sound a tone and then BRK; it can 
include an error correcting scheme; or 
whatever you desire. 



Using CONTROL 

A simple application of the CONTROL 
program is that of counting the number 
of cycles used by a machine level 
program or subroutine. If you program 
in assembly language there are times 
when you would like to know how 
many cycles your coding uses. This 
information is useful for comparing the 
efficiency of one algorithm to another 
and when writing interrupt service 
routines that have a limited amount of 
time to perform their operations. Using 
CONTROL with the two cycle 
counting support routines provided 
will compute the exact number of 
cycles, including page boundary 
crossover cycles, used by your 
program. CONTROL runs your coding, 
but slower since there are instructions 
executed between each of the 
instructions in your program. 

To use the cycle counter you should 
have a debugging monitor to display 
and change memory locations. Load 
CONTROL with the support routines 
ACCYC and OVER. Load the program 
you wish to test. Put the starting 
address of your program in PCTR ($B1 
in our assembled version, may be 
different in your customized version). 
The least significant byte (LSB) goes in 
PCTR, the most significant byte (MSB) 
in PCTR+1. If you need to initialize 
the 6502 registers, do so by putting the 
values in the storage locations ACC, 
XREG and YREG (A, X and Y registers), 
STREG (status register) and STKPTR 
(stack pointer). These locations are at 
$0BF8 to $OBFC in our version. Note 
that when using this program to count 
the cycles used by an interrupt service 
routine, the operation of the service 
routine is by CONTROL and begun by 
you, not by an interrupt. After an RTI 
instruction is processed, the BRK at 
BREAK will be processed and 
CONTROL will stop. 
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Now you can run CONTROL in the 
cycle counting mode. When it stops, 
display TALLY, the eight bytes starting 
at $OBFO in our version, to see how 
many cycles your program used. The 
LSB is in the highest address, $0BF7. If 
an illegal opcode was fetched or there 
isn't enough room in TALLY to 
accumulate the cycles, then the error 
handler at ERROR will cause a BRK. 
See the separate examples for having 
ERROR sound a tone on the Atari, 
Apple and Commodore 64. 



Adapting CONTROL 

The original version of CONTROL was 
written on an Atari. The version listed 
here was run on the Apple IL The only 



change required was the memory 
location of the program itself. For the 
Atari, change the origin to $0600 or any 
other available IK RAM. The Page Zero 
equates are okay. For the Commodore 
64, $C000 is a handy origin for the 
program. Since Page Zero on the C64 is 
pretty full, the locations that you 
choose may depend on what else you 
are running. If you are not using the 
cassette tape and RS-232 port, for 
example, then the current equates of 
$B1 to $B4 should be okay. 

The best way to make the 
adaptation is to key source into your 
assembler, change the equates and 
origin and re-assemble. This will give 
you a working version of CONTROL 
that you can then easily modify for 
other services: trace, single-step, 



disassemble, trap and so forth. If you do 
not have an assembler, the listed code 
can be directly keyed in. Make sure 
that you change the instructions that 
have direct references (generally the 
instructions with a value of 08 to OB in 
the third byte of the instruction], plus 
the high byte address of BREAK that is 
referenced in the very first instruction. 

[Editor's Note: This "cycle 
counting" demonstiation of the 
CONTROL pzogzam is only one very 
limited use of this powerful technique. 
If you find CONTROL useful and 
extend its operation, MICRO is eager to 
help you share your work with the rest 
of the world. We are reserving space for 
CONTROL enhancements and 
guarantee extremely rapid publication.] 
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Listing 1 






081D Bl Bl 
081F 48 




LDA (PCTR),Y 
PHA 


o 






; Set BASE for IK program area 


0820 29 F0 




AND #$F0 




0800 




BASE EQU $0800 


0822 F0 05 




BEQ INDEX 




0800 




ORG BASE 


0824 4A 




LSR A 


o 






; Equates. PCTR, TEMPLO and 


0825 4A 




LSR A 






; TEMPHI must be on Page ZERO 


0826 4A 




LSR A 




00B1 




PCTR EQU |B1 


0827 4A 




LSR A 




00B3 




TEMPLO EQU PCTR-(-2 


0828 A8 




TAY 


o 


00B4 




TEMPHI EQU ?CTR+3 
; Other equates can be anywhere, 


0829 BE 33 U 
0820 68 


IhfDEX 


LDX TABIN,Y 
PLA 








; Including Page ZERO 


082D E8 


SCANl 


INX 




0BF0 




TALLY EQU BASE-(-|3F0 


082E DD 43 0A 




CMP INST1,X 


o 


0BF8 




ACC EQU TALLY-(-8 


0831 F0 05 




BEQ SERVICE 




0BF9 




XREG EQU TALLY-H9 


0833 B0 F8 




BCS SCANl 




0BFA 




YREG EQU TALLY-i-IA 


0835 4C CA 0B 




JMP ERROR 


o 


0BFB 




STREG EQU TALLY-(-|B 




Start 


service when OPCODE found 


0BFC 




STKPTR EQU TALLY-(-|C 




Save J 


Lnfo from CYCLES table on 








; Entry and Initialization 




stack 


The JMP ACCYC is for the 








; Put BREAK address on stack for 




TALLY 


Counter. Other operations 


o 






; call via RTI in user code 




could 


be used Instead. 




0800 A9 0A 


START LDA #BREAK/256 


0838 BD DA 0A 


SERVICI 


: LDA CYCLES, X 




0802 AE FC 0B 


LDX STKPTR 


083B 48 




PHA 


o 


0805 9A 




TXS 


083C 4C 9F 0B 




JMP ACCYC 


0806 48 




PHA 




Now Process instruction. First 




0807 A9 32 


LDA #BREAK8c|00FF 




test ; 


Lf the instruction can be 




0809 48 




PHA 




directly executed. If so, go 


o 


080A A9 00 


LDA #0 




to TRANSF to execute. 




080C 48 




PHA 


083F A0 00 


PROCESS 


3 LDY m 




080D BA 




TSX 


0841 68 




PLA 




080E 8E FC 08 


STX STKPTR 


0842 30 03 




BMI SUB 









; Clear TALLY counter 


0844 4C 8A 09 




JMP TRANSF 




0811 A2 


07 


LDX #7 




Instructions that change the PC 




0813 A9 00 


LDA #0 




; counter must be individually 


o 


0815 9D 


F0 0B 


CLR STA TALLY, X 




; serviced. 


0818 CA 




DEX 




; Test 1 


^or JSR = 120 




0819 10 


FA 


BPL CLR 
; Main Loop. Get 


0847 Bl Bl 
0849 C9 20 


SUB 


LDA (PCTR),Y 
CMP #120 


o 






; OPCODE of current instruction 
; Lookup in tables 


084b D0 33 
084D A5 Bl 




BNE ABSJMP 
LDA PCTR 




081B A0 


00 


FETCH LDY #0 


084F 85 B3 




STA TEMPLO 
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Listing 1 (continued) 










0851 A5 B2 


LDA PCTR+1 


08CB AE FC 0B 


LDX STKPTR 




0853 8D BA 00 


STA TEMPHI 


08CE 9A 


TXS 




0856 C8 


INY 


08CF 68 


PLA 


o 


0857 Bl Bl 


LDA (PCTR),Y 


08D0 85 Bl 


STA PCTR 




0859 48 


PHA 


08D2 68 


PLA 




085A C8 


INY 


08D3 85 B2 


STA POTR+1 


o 


085B Bl Bl 


LDA (PCTR),Y 


08D5 E6 Bl 


INC PCTR 




085D 85 B2 


STA PCTR+1 


08D7 D0 02 


BNE ONGPTR 




085F 68 


PLA 


08D9 E6 B2 


INC POTR+1 




0860 85 Bl 


STA PCTR 


08DB BA 


ONGPTR TSX 


o 


0862 A5 B3 


LDA TEMPLO 


08DC 8E FC 0B 


STX STKPTR 




0864 18 


CLC 


08DF 40 IB 08 


JMP FETCH 




0865 69 02 


ADC #2 




; Test RTI = $40 


a 


0867 85 B3 


STA TEMPLO 


08E2 09 40 


RTINT CMP #$40 


\y 


0869 90 03 


BCC STACK 


08E4 D0 15 


BNE BRANCH 




086B EE BA 00 


INC TEMPHI 


08E6 AE FC 0B 


LDX STKPTR 




086E AD BA 00 


STACK LDA TEMPHI 


08E9 9A 


TXS 


o 


0871 AE FC 0B 


LDX STKPTR 


08EA 68 


PLA 




0874 9A 


TXS 


08EB 8D FB 0B 


STA STREG 




0875 A8 


PHA 


08EE 68 


PLA 


/•^ 


0876 A5 B3 


LDA TEMPLO 


08EF 85 Bl 


STA POTR 


o 


0878 48 


PHA 


08F1 68 


PLA 




0879 BA 


TSX 


08F2 85 B2 


STA PCTR+1 




087A 8E FC 0B 


STX STKPTR 


08F4 BA 


TSX 


o 


087D AC IB 08 


JMP FETCH 


08F5 8E FC 0B 


STX STKPTR 


^t^ 




; Test JMP = $4C 


08F8 40 IB 08 


JMP FETCH 




0880 C9 AC 


ABSJMP OMP #$40 




; Must be a conditional 


Branch 


0882 D0 0F 


BNE INDJMP 


08FB AD FB 0B 


BRANCH LDA STREG 


O 


0884 C8 


INY 


08FE 48 


PHA 




0885 Bl Bl 


LDA (PCTR),Y 


08FF Bl Bl 


LDA (PCTR),Y 




0887 48 


PHA 




; Test BEQ = $F0 


O 


0888 C8 


INY 


0901 09 F0 


CMP ii'$F0 


0889 Bl Bl 


LDA (PCTR),Y 


0903 D0 05 


BNE BRl 




088B 85 B2 


STA PCTR+1 


0905 28 


PLP 




088D 68 


PLA 


0906 F0 49 


BEQ TRUE 


o 


088E 85 Bl 


STA PCTR 


0908 D0 39 


BNE FALSE 




0890 AC IB 08 


JMP FETCH 




; Test BNE = $D0 






; Test JMPI = |6C 


090A 09 D0 


BRl CMP #$D0 




0893 C9 60 


INDJMP CMP #|6C 


0900 D0 05 


BNE BR2 


o 


0895 D0 30 


BNE RTSUB 


090E 28 


PLP 




0897 08 


INY 


090F D0 40 


BNE TRUE 




0898 Bl Bl 


LDA (PCTR),Y 


0911 F0 30 


BEQ FALSE 


o 


089A 48 


PHA 




; Test BOO = $90 


\^ 


089B C8 


INY 


0913 09 90 


BR2 CMP #$90 




0890 Bl Bl 


LDA (PCTR),Y 


0915 D0 05 


BNE BR3 




089E 85 B2 


STA PCTR+1 


0917 28 


PLP 


o 


08A0 68 


PLA 


0918 90 37 


BCC TRUE 




08A1 85 Bl 


STA PCTR 


091A B0 27 


BOS FALSE 




08A3 A0 00 


LDY #0 




; Test BOS = $B0 


^% 


08A5 Bl Bl 


LDA (PCTR),Y 


0910 09 B0 


BR3 CMP #$B0 


o 


08A7 48 


PHA 


091E D0 05 


BNE BR4 




08A8 A5 Bl 


LDA PCTR 


0920 28 


PLP 




08AA 09 FF 


CMP #$FF 


0921 B0 2E 


BOS TRUE 


o 


08AO F0 0B 


BEQ RESET 


0923 90 IE 


BCC FALSE 




08AE C8 


INY 




; Test BMI = $30 




08AF Bl Bl 


LDA (PCTR),Y 


0925 09 30 


BR4 CMP #$30 




08B1 85 B2 


STA PCTR+1 


0927 D0 05 


BNE BR5 


o 


08B3 68 


PLA 


0929 28 


PLP 




08B4 85 Bl 


STA PCTR 


092A 30 25 


BMI TRUE 




08B6 4C IB 08 


JMP FETCH 


0920 10 15 


BPL FALSE 


o 


08B9 A9 00 


RESET LDA #0 




; Test BPL = $10 


08BB 85 Bl 


STA PCTR 


092E 09 10 


BR5 CMP #$10 




08BD Bl Bl 


LDA (PCTR),Y 


0930 D0 05 


BNE BR6 




08BF 85 B2 


STA PCTR+1 


0932 28 


PLP 


o 


08C1 68 


PLA 


0933 10 10 


BPL TRUE 




0802 85 Bl 


STA PCTR 


0935 30 00 


BMI FALSE 




08C4 4C IB 08 


JMP FETCH 




; Test BVC = $50 






; Test RTS = |60 


0937 09 50 


BR6 CMP #$50 


o 


08C7 C9 60 


RTSUB CMP #160 


0939 D0 05 


BNE BR7 




08C9 D0 17 


BNE RTINT 


093B 28 


PLP 
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Listing 1 (continued) 


09A4 4C 9B 09 


JMP MOVE 










; If less than three bytes of 




093C 50 13 


BVC TRUE 




; instruction, pad with NOP's 




© 093E 70 03 


BVS FALSE 


09A7 C0 03 


FILLED CPY #3 






; Must be BVS = |70 


09A9 F0 0A 


BEQ POINT 




0940 28 


BR7 PLP 


09AB A9 EA 


LDA #|EA 




^ 0941 70 0E 


BVS TRUE 


09AD 99 lA 0A 


PUT STA EXBUF, Y 




; On branch condition FAI5E, simply 


09B0 C8 


INY 






; set PC counter to next instruction 


09B1 C0 03 


CPY #3 




0943 A5 Bl 


FALSE LDA PCTR 


09B3 D0 F8 


BNE PUT 




0945 18 


CLC 




; Calculate address of next 




0946 69 02 


ADC #2 




; instruction 




0948 85 Bl 


STA PCTR 


09B5 68 


POINT PLA 




094a 90 2C 


BCC FCH 


09B6 18 


CLC 




© 094c E6 B2 


INC PCTR+1 


09B7 69 01 


ADC #1 




094E 4C IB 08 


JMP FETCH 


09B9 65 Bl 


ADC PCTR 






; On branch condition TRUE, calculate 


09BB 85 Bl 


STA PCTR 




® 0951 C8 


; new PC relative to current address 


09BD 90 02 


BCC OVERPG 




TRUE INY 


09BF E6 B2 


INC PCTR+1 




0952 Bl Bl 


LDA (PCTR),Y 




; Use Opcode info from table to 




0954 48 


PHA 




; see if Page boundary check is 




© 0955 A5 Bl 


LDA PCTR 




; necessary. 




0957 18 


CLC 


09C1 A5 B3 


OVERPG LDA TEMPLO 




0958 69 02 


ADC #2 


09C3 29 40 


AND #140 




095A 85 Bl 
^ 095C 90 02 


STA PCTR 


09C5 F0 41 


BEQ RUN 




BCC DIRECT 




; Service indexed instructions 




095E E6 B2 


INC PCTR+1 


09C7 AD lA 0A 


LDA EXBUF 






; Test branch direction 


09CA E8 


SCAN2 INX 




Q 0960 68 


DIRECT PLA 


09CB DD 71 0B 


CMP INST2,X 




0961 10 18 


BPL FORWRD 


09CE F0 02 


BEQ MODE 






; Backward branch service 


09D0 B0 F8 


BCS SCAN2 




0963 49 FF 


EOR #|FF 


09D2 BD 88 0B 


MODE LDA ADRMOD,X 




© 0965 18 


CLC 


09D5 F0 IB 


BEQ IND 




0966 69 01 


ADC #1 


09D7 A5 B3 


LDA TEMPLO 




0968 85 B3 


STA TEMPLO 


09D9 29 20 


AND #120 




096A A5 Bl 
Q 096C 38 


LDA PCTR 


09DB D0 06 


BNE ADDX 




SEC 




; Add Y reg to operand 




096D E5 B3 


SBC TEMPLO 


09DD AD FA 0B 


LDA YREG 




096F 85 Bl 


STA PCTR 


09E0 4C E6 09 


JMP ADDY 




O 0971 B0 05 


BCS FCH 




; Add X reg to operand 




0973 C6 B2 


DEC PCTR+1 


09E3 AD F9 0B 


ADDX LDA XREG 




0975 20 BA 0B 


JSR OVER 


09E6 18 


ADDY CLC 




0978 4C IB 08 


FCH JMP ^'ETCH 


09E7 6D IB 0A 


ADC EXBUF+1 




O 


; Forward branch service 


09EA 90 IC 


BCC RUN 




097B 18 


FORWRD CLC 


09EC 20 BA 0B 


JSR OVER 




097C 65 Bl 


ADC PCTR 


09EF 4C 08 0A 


JMP RUN 




- 097E 85 Bl 
" 0980 90 F6 


STA PCTR 




; Indirect Indexed Address mode 




BCC FCH 


09F2 AD IB 0A 


IND LDA EXBUF+1 




0982 E6 B2 


INC PCTR+1 


09F5 85 B3 


STA TEMPLO 




0984 20 BA 08 


JSR OVER 


09F7 A9 00 


LDA #0 




O 0987 4C IB 08 


JMP FETCH 


09F9 8D B4 00 


STA TEMPHI 






; Move current instruction to 


09FC A8 


TAY 






; buffer for execution. Use 


09FD Bl B3 


LDA ( TEMPLO ),Y 






; Opcode information from table 


09FF 18 


CLC 




© 


; to determine number of bytes of 


0A00 6D FA 0B 


ADC YREG 






; instruction to move to buffer 


0A03 90 03 


BCC RUN 




098A 85 B3 


TRANSF STA TEMPLO 


0A05 20 BA 0B 


JSR OVER 




Q 098C Bl Bl 
098E 8D lA 0A 


LDA (PCTR),Y 




; Restore all registers 




STA EXBUF 


0A08 AE FC 0B 


RUN LDX STKPTR 




0991 C8 


INY 


0A0B 9A 


TXS 




0992 A5 B3 


LDA TEMPLO 


0A0C AD FB 0B 


LDA STREG 




© 0994 29 18 


AND #118 


0A0F 48 


PHA 




0996 4a 


LSR A 


0A10 28 


PLP 




0997 4a 


LSR A 


0A11 AE F9 0B 


LDX XREG 




- 0998 4A 


LSR A 


0A14 AC FA 0B 


LDY YREG 




^ 0999 48 


PHA 


0A17 AD F8 0B 


LDA ACC 




099A AA 


TAX 




; Execute direct instruction 




099B CA 


MOVE DEX 




; stored in next three bytes 




© 099C 30 09 


BMI FILLED 


0A1A 00 00 00 


EXBUF BYT 0,0,0 




099E Bl Bl 


LDA (PCTR),Y 




; Save all registers 




09A0 99 lA 0A 


STA EXBUF, Y 


0A1D 8D F8 0B 


STA ACC 




09A3 C8 


INY 


0A20 8C FA 0B 


STY YREG 
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Listing 1 (continued) 












0B1A 8B 4D 0C 


BYT $8B,$4D,$0C,$0E 


|:;::;: 


Illk23 8E F9 0B 


STX XREG 


0B1E 02 54 74 


BYT 2, $54, $74, $17 _ 




0A26 08 


PHP 


0B22 0E 0B 0B 


BYT $0E,$0B,$0B,$0B ^ 




0A27 68 


PLA 


0B26 02 02 14 


BYT 2,2,$l4,$l4,$l4 




0A28 8D FB 0B 


STA STREG 


0B2B 8B 0E 0C 


BYT $8B,$0E,$0C,$0C 




0A2B BA 


TSX 


0B2F 0C 02 15 


BYT $0C,2,$15,2,$15 © 


;;;::;^:: 


0A2C 8E FC 0B 


STX STKPTR 


0B34 0A 0E 0A 


BYT $0A,$0E,$0A,$0B 


IP 




; And back to Main Loop 


0B38 0B 0B 02 


BYT $0B,$0B,2,$0A 




0A2F he IB 08 


JMP FETCH 


0B3C 02 14 14 


BYT 2, $14, $14, $14 


■S.-;: 




; Ccme here when an RIT is encountered 


0B40 8B 4D 0C 


BYT $8B,$4D,$0C,$0C © 






; in the User Program being tested 


0B44 0C 02 54 


BYT $0C,2,$54,2,$74 




0A32 00 


BREAK BRK 


0B49 74 54 0A 


BYT $74,$54,$0A,$0E 


;li 




; Index values to speed opcode search 


0B4D 0B 0B 0D 


BYT $0B,$0B,$0D,2,$0A q 
BYT 2, $14, $14, $16 




0A33 FF 08 10 


TABIN BYT $FF,8,$10,$1B 


0B52 02 14 14 




0A37 23 2D 35 


BYT $23, $2D, $35, $3F 


0B56 8B 40 0C 


BYT $8B,$4D,$0C,$0E 




0A3B ^7 50 59 


BYT $47, $50, $59, $65 


0B5A 02 54 74 


BYT 2, $54, $74, $17 




0A3F 70 7B 83 


BYT $70,$7B,$83,$8E 


0B5E 0A 0E 0B 


BYT $0A,$0E,$0B,$0B © 


>?;:;■ 




; All of the valid opcodes 


0B62 0D 02 0A 


BYT $0D,2,$0A,2 




0Aii3 00 01 05 


INSTl BYT 0,1,5,6,8 


0B66 14 14 16 


BYT $14, $14, $16 




0A'48 09 0A 0D 


BYT 9,$0A,$0D,$0E 


0B69 8B 40 00 


BYT $8B,$4D,$0C,$0E 




<ikhC 10 11 15 


BYT $10, $11, $15, $16 


0B6D 02 54 74 


BYT 2, $54, $74, $17 ^ 




0A50 18 19 ID 


BYT $18,$19,$1D,$1E 




; Opcodes that require page boundary 




0A5A 20 21 2h 


BYT $20, $21, $24, $25 




; crossover check 




0A58 26 28 29 


BYT $26,$28,$29,$2A 


0B71 11 19 ID 


INST2 BYT $11,$19,$1D,$31 © 




0A5C 2C 2D 2E 


BYT $2C,$2D,$2E 


0B75 39 30 51 


BYT $39,$3D,$51,$59,$5D 


is 


0A5F 30 31 35 


BYT $30, $31, $35, $36 


0B7A 71 79 7D 


BYT $71,$79,$7D,$B1 




0A63 38 39 3D 


BYT $38,$39,$3D,$3E 


0B7E B9 BC BD 


BYT $B9,$BC,$BD,$BE 




0A67 -^0 -il 45 


BYT $40, $41, $45, $46, $48 


0B82 Dl D9 DD 


BYT $D1,$D9,$DD © 


■i| 


0A6C 49 4a 4C 


BYT $49,$4a,$4C,$4D,$4E 


0B85 Fl F9 FD 


BYT $F1,$F9,$FD 




0A71 50 51 55 


BYT $50,$51,$55,$56 




; Addressing mode table 




0A75 58 59 5D 


BYT $58,$59,$5D,$5E 




; = Indirect Indexed addressing 
; FF = Absolute Indexed addressing ^ 




0A79 60 61 65 


BYT $60, $61, $65, $66, $68 






0A7E 69 6A 6C 


BYT $69,$6A,$6C,$6D,$6E 


0B88 FF 00 00 


ADRMOO BYT $FF,0,0,$FF 




0A83 70 71 75 


BYT $70, $71, $75, $76 


0B8C 00 00 FF 


BYT 0,0,$FF,0,0 




0A87 78 79 7D 


BYT $78,$79,$7D,$7E 


0B91 FF 00 00 


BYT $FF,0,0,$FF © 


g;::; 


0A8B 81 84 85 


BYT $81, $84, $85, $86 


0B95 00 00 00 


BYT 0,0,0,0 




0A8F 88 8A 8C 


BYT $88,$8A,$8C,$8D,$8E 


0B99 FF 00 00 


BYT $FF,0,0,$FF,0,0 


:'"": ':■'- 


0A94 90 91 94 


BYT $90, $91, $94, $95 




; Service specific code goes here 




0A98 96 98 99 


BYT $96,$98,$99,$9A,$9D 




; This version is a cycle counter 




0A9D A0 Al A2 


BYT $A0,$A1,$A2,$A4 


0B9F A2 07 


ACCYC LDX §1 




0AA1 A5 A6 A8 


BYT $A5,$A6,$A8,$A9 


0BA1 29 07 


AND #7 




0AA5 AA AC AD 


BYT $AA,$AC,$AD,$AE 


0BA3 18 


CLC ^ 

ADC TALLY, X ^ 




0AA9 B0 Bl B4 


BYT $B0,$B1,$B4,$B5 


0BA4 7D F0 0B 




0AAD B6 88 B9 


BYT $B6,$B8,$B9,$BA 


0BA7 9D F0 0B 


STA TALLY, X 




0AB1 BC BD BE 


BYT $BC,$BD,$BE 


0BAA 90 0B 


BCC ACCEND 




0AB4 C0 CI C4 


BYT $C0,$C1,$C4,$C5 


0BAC CA 


ADDU DEX 




0AB8 C6 C8 C9 


BYT $C6,$C8,$C9,$CA 


0BAD 10 03 


BPL PROC 




0ABC CC CD CE 


BYT $CC,$CD,$CE 


0BAF 4C CA 0B 


JMP ERROR 


w.. 


0ABF D0 Dl D5 


BYT $D0,$D1,$D5,$D6 


0BB2 FE F0 0B 


PROC INC TALLY, X 




0AC3 D8 D9 DD 


BYT $D8,$D9,$DD,$DE 


0BB5 F0 F5 


BEQ ADDU © 




0AC7 E0 El E4 


BYT $E0,$E1,$E4,$E5 


0BB7 4C 3F 08 


ACCEND JMP PROCESS 




0ACB E6 E8 E9 


BYT $E6,$E8,$E9,$EA 




; Specific service to count cycles 




0ACF EC ED EE 


BYT $EC,$ED,$EE 




; This increments the count when a ^ 




0AD2 F0 Fl F5 


BYT $F0,$F1,$F5,$F6 




; page boundary is crossed. 




0AD6 F8 F9 FD 


BYT $F8,$F9,$FD,$FE 
; Opcode information bytes 




; Most routines could just put a 
; RTS in place of OVER 




0ADA 07 0E 0B 


CYCLES BYT 7,$0E,$0B,$0D,3 


0BBA A2 07 


OVER LDX #7 




0ADF 0A 02 14 


BYT $0A,2,$14,$16 


0BBC FE F0 0B 


TAL INC TALLY, X 




0AE3 8B 4D 0C 


BYT $8B,$4D,$0C,$0E 


0BBF D0 08 


BNE LEAVE 




0AE7 02 54 74 


BYT 2, $54, $74, $17 


0BC1 CA 


DEX 




0AEB 96 0E 0B 


BYT $96,$0E,$0B,$0B,$0D,4 


0BC2 10 F8 


BPL TAL Q 




0AF1 0A 02 14 


BYT $0A,2,$l4,$l4,$l6 


0BC4 68 


PLA 




0AF6 8B 4D 0C 


BYT $8B,$4D,$0C,$0E 


0BC5 68 


PLA 




0AFA 02 54 74 


BYT 2, $54, $74, $17 


0BC6 4C CA 0B 


JMP ERROR o 




0AFE 86 0E 0B 


BYT $86,$0E,$0B,$0D,3 


0BC9 60 


LEAVE RTS 




0B03 0A 02 93 


BYT $0A,2,$93,$14,$16 




; Machine and Routine specific ei-ivr 




0B08 8B 4D 0C 


BYT $8B,$4D,$0C,$0E 




; handler. Can be just BRK. 




0B0C 02 54 74 


BYT 2, $54, $74, $17 


0BCA 00 


ERROR BRK O 




0B10 86 0E 0B 


BYT $86,$0E,$0B,$0D,4 




; That's all ! 




0B15 0A 02 95 


BYT $0A,2,$95,$14,$16 


0BCB 


END 
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Commodore 64 Beeper 

Note: There is not enough 
room at the end of the main 
program for this code since 
0BF0 ... is used for storage. 
Put a JMP ERRORX at the current 
ERROR BRK location pointing to 
this code which may be relocated 
in any available memory. 



0000 
0002 
0003 
0006 
0007 
0009 



000D 
0010 
0012 
0015 
0017 
001A 
001C 
001F 
0021 
0024 
0026 
0028 
0029 
002B 
002C 
002E 



A9 00 
AA 
9D 
E8 

E0 19 
D0 F8 
A9 09 
8D 05 DA 
A9 0F 
8D 18 D4 
A9 Bl 
8D 00 DA 
A9 19 
8D 01 DA 
A9 21 
8D 0A DA 
A2 00 
A0 00 
C8 

D0 FD 
E8 

D0 FA 
00 



ERRORX 
DA CLEARS 



WAITS 



IDA §$00 

TAX 

STA |D400,X 

INX 

CPX #119 

BNE CLEARS 

LDA #109 

STA 10405 

LDA #$0F 

STA |DAl8 

LDA #|B1 

STA 10400 

LDA #119 

STA ID401 

LDA #121 

STA $0404 

LDX #$00 

LOY #$00 

INY 

BNE WAITS 

INX 

BNE WAITS 

BRK 



Atari Version of Beeper 



0BCA A9 00 
0BCC 8D 08 02 
0BCF A9 03 
0BO1 80 0F 02 
0BO4 A9 A8 
0BO6 8D 01 02 
0BO9 A9 79 
0BOB 80 



00 02 



0BOE 00 



ERROR LOA #0 

STA $0208 
LOA #3 
STA $O20F 
LOA #$A8 
STA $0201 
LOA #121 
STA $0200 
BRK 



; Apple II Version of Beeper 



0BCA 20 E4 FB ERROR JSR $FBE4 
0BCD 00 BRK 




Sure 
iti insured? 

SAFEWARE™ Insurance provides full 
replacement of fiardware, media and 

purcfiased software. As little as $35/yr covers: 
• Fire • Thefi • Power Surges 

• Earthquake • Water Damage • Auto Accident 

For information or immediate coverage call: 

1-800-848-3469 

In Ohio call (614) 262-0559 
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Editor's Note: While we nonnally do 
not publish articles. that aie essentially 
"one man's opinion", we ate making 
an exception in this case because 1) it 
touches on a very important area, the 
68000, and 2) they aie eminantly 
qualified to talk about the issues. 



It may have been a result of reading an 
over-abundance of IBM PC ads that 
caused people, without knowledge of 
assembly language or microprocessor 
architecture, to blatantly predict that 
MS-DOS on the eight bit 8088 chip will 
become the measure by which all 
sixteen bit microcomputers will be 
judged during the coming decade. That 
view is simply wrong, and such 
comments (especially by people who 
should know better) may be the result 
of an understandable impatience with 
the performance of slow, memory 
limited, eight bit microcomputers -but 
to declare that the 80XXX is going to be 
the de facto industry standard is short- 
sighted at best, and misleading at 
worst. 

For those preparing to buy a serious 
microcomputer for the first time (not 
just an elaborate toy), be aware that 
even though the IBM PC and all its 
clones use 8088 chips, they use them as 
eight bit CPUs. (IBM claims the 8088 
in the PC is sixteen bits, but it just isn't 
so. The 1983 Intel Microprocessor and 
Peripheral Handbook clearly states, on 
page 3-79, that the 8088 is an eight bit 
microprocessor, and they should know. 
They invented the chip). IBM justifies 
this claim by citing the 16 bit internal 
registers in the 8088. The Commodore 
6502 used in the Apple and the 
Commodore 64 has one, sixteen bit 
register (the program counter). The 
6502 is not called a sixteen bit 
microprocessor. The Motorola 6809 
used in the Radio Shack Color 



by Paul Lamar and Richard Finder 



Two seasoned computerists share their insights 
into the world of the 16 bit 68000 Supermicro. 



Computer has six, sixteen bit registers 
and it is not called a 16 bit 
microprocessor. Why call an 8088 a 
sixteen bit microprocessor? 

Watch Large Computer Corps. 
(LCCs) carefully; they take advantage 
of ignorance every chance they get. 
Rather than try to educate the user, the 
LCC uses seduction to persuade the 
buyer into a purchase not suited to the 
individual's needs or desires. A 
corollary of the business maxim "buy 
low, sell high" is "sell as little as 
possible for as much as you can get" . It 
is the buyer's responsibility (in 
computers, as well as cars, houses, and 
health insurance) to learn something 
about microcomputers before writing 
out that first check. Any LCC ad which 
doesn't set forth facts about number-of- 
characters-on-the-screen, disk storage 
capacity, RAM, ROM, megabytes and 
megahertz is hiding something 
(probably mediocre performance or 
operational deficiencies) . 

There is a common myth that speed 
and power in a microcomputer are not 
really necessary when "all you are 
going to use that microcomputer for is 
word processing". A fast typist types 
about 60 words a minute. If each word 
is an average of five characters in 
length; that means that one character is 
going into the computer every 200,000 
micro seconds. When you are typing 
characters into a wordprocessing 
program, it takes a typical 
microprocessor and program about 
10,000 micro seconds to process that 



character. The other 190,000 micro 
seconds the processor is twiddling its 
thumbs so to speak. Why not put that 
time to good use by a fast and powerful 
microprocessor. How many characters 
of spelling or grammar could that micro 
check in those remaining 190,000 
micro seconds? 

It's not a matter of being a 
microcomputer speed freak, but of not 
wanting to waste time while some 
infernal machine which knows nothing 
about time and couldn't care less does 
something useful. "Disgruntled" is an 
eleven-letter word for the owner of a 
micro-word processor who has to look 
up a word in a dictionary because 
the human works faster than the 
computer. There is nothing more 
useless than a $150 spelling checker 
which isn't used - because the 
machine is too slow. 

The dream word processing 
program is one which checks the 
spelling of the word as it's being typed 
in. Ideally, it could not only check the 
spelling of the word, but could finish 
writing out the word. For example, the 
writer would begin the word "spelli"; 
the computer would fill in "ng" and 
the cursor would jump to the next word 
position (there's only one word spelled 
"spelling"). Of course, turning off such 
a feature would be a necessary option. 
As an alternative, a misspelling could 
cause a word to be flagged or prompt 
a beep, and optionally show the 
suggested correction as part of a 
dictionary in a window, along with the 
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definition(s) of the word. 

Computers are tools to increase 
productivity. An automobile 
manufacturer who designed a factory to 
produce automobiles 20% slower than 
that of the competition faces business 
failure. As a writer, accountant, or 
business manager, why buy an eight bit 
8088 based microcomputer that is one 
fourth as fast as a true sixteen bit 68000 
based supermicro? 

As was said by the philosopher, 
Dionysius of Halicarnassus, "...history 
is philosophy learned from examples". 
The philosophical point espoused here 
is the superiority of the 68000 chip for 
state-of-the-art microprocessing. My 
own history (which brought me to this 
point of view), is that several years ago 
I was part owner of one of the first 
Apple peripheral and software 
manufacturing firms. Our company 
bought one of the first two hundred 
Apple 11 processor boards made, which 
was delivered with 4K of RAM, with no 
keyboard, power supply or case. 
Documentation consisted of a printed 
color brochure and some photocopied 
pages in a plastic-covered binder off a 
drug store shelf. No system monitor 
source listing came with the computer,- 
a complaint to Steve Wozniak brought 
a photocopy of it. 

Before the Apple II, I wire wrapped 
an Intel 4040 and RCA CMOS 1801 
(not an 1802) microprocessors. The 
4040 was a nightmare with many 
different silicon technologies that 
required voltage level shifting among 
the various required chips. Intel's 
promotion literature did not mention 
this. Only after you bought the $100 
chip and received the data sheet did 
this become apparent. I bought an early 
IK RAM, 2K ROM, MOS Technology 
KIM-1. 

The KIM-1 was a revelation and 
very easy to use. I wrote a real-time, 
multi-tasking, interrupt-driven 
program on the KIM-1 using the 
KIM-l's hex keypad and 6 digit LEDs. 
That program required six months to 
write, yet it was only 2K bytes in 
length (I kludged on another IK RAM). 
I designed and manufactured an 
industrial microcomputer called the 
SUPERKIM which we are still 
manufacturing. 

We bought the Apple II board 
because we needed a more powerful 
microcomputer than the KIM-1 to 
write 6502 assembly language 
software. (Writing and assembling 
programs is one of the most demanding 
tasks you can ask of any computer.] 



We attached a homemade power 
supply, a surplus keyboard, and a used 
video monitor to our new Apple II 
board - and it worked. We wrote a 
crude printer driver routine using the 
built-in miniassembler for a South 
West Technical Products PR 40 printer, 
then designed a very simple printer 
interface board for the Apple II. To my 
knowledge, this was the first printer 
interface ever sold for the Apple 11. 

We searched for a symbolic 
assembler to use on the Apple. (We 
where not sure at that time what a 
symbolic assembler was, but our 
friends assured us that it was 
something we needed.) A symbolic 
assembler allows you to jump to a 
name (symbol) of a routine within a 
program, rather than to its address. 
(Jumping to the address of a routine is 
what you do in BASIC when you say 
GOTO 1010.) Unlike an address, the 
name of a routine doesn't change 
regardless of how much code you put in 
front of it. Most symbolic assemblers 
automatically calculate the branch 
addresses as well, unlike the mini 
assembler in ROM, in the Apple 11. 

Bob Bishop and I typed in a four 
character symbolic assembler written 
by Carl Moser (lately of Eastern House 
Software), and Bob (later of Apple 
Vision fame) made it work. Our 
assembler was a big step above the 
Apple mini-assembler, and we sold 
many of those four-character symbolic 
assemblers. This too was a first for the 
Apple II. 

So it went for several years until 
other computers arrived on the market 
and we slowly began to realize what we 
were missing: eighty columns on the 
display, a screen editor, larger disk 
and RAM storage and speed. Eighty 
columns was particularly missed when 
writing assembly language text files 
as there was no room for comments on 
the right side of the screen. We needed 
larger disk storage because a 2K 
assembly language program occupies 
about 32K of commented text file on a 
disk. We did not want to utilize any 
of the third party solutions to these 
problems due to potential 
incompatibility with our then present 
software-and there was a tendency of 
Apple n software vendors to copy- 
protect their product, making their 
software impossible to store on hard 
disk or make back up copies. 

By this time we had become 
authorized dealers for Apple, 
Commodore, Zenith and Kaypro, in 
addition to manufacturing and selling 



our own CP/M, eight inch drive, Z80 
system; all of these were too slow. The 
Commodore 8032/8050 was the best of 
the bunch thanks to the legendary 
Chuck Peddle, designer of the 6502 
(then working for Commodore) . It had 
an amazing 50GK on each single sided 
five-inch disk. Poor Chuck made a big 
mistake on the Victor when he 
designed in the eight bit 8088 rather 
than the 68000 (he's now an ex- 
president of VictOT-and Victor is in 
Chapter 11), apparently a victim of the 
IBM mystique. The Commodore 8032 
lacked the speed or RAM memory 
desired to justify switching from the 
Apple II. 

The imminent arrival of the Apple 
III carried hopes that it would have a 
68000 microprocessor, but it had 
instead a 6502A microprocessor-only 
143K on the disk, memory bank 
switching, and a steep price tag. Several 
computer store owners actually 
shouted epithets at Apple's Barry 
Zargoni when he introduced the Apple 
III at the pre-release dealer's meeting. 
Apple management ignored their 
dealers. 

While the Apple III had a few 
hardware problems when it was first 
announced, those were not the main 
reason for its disappointing sales . In the 
very early days of the Apple II some 
wordprocessing programs--horribly 
slow- were written with interpreted 
integer BASIC. An operating system, a 
high level language or a wordprocessing 
program written with a high level 
language (an HLL, such as BASIC) 
results in very slow performance. The 
only proper way is to use assembly 
language. Thus, the Apple III BASIC 
ran about the same speed as Applesoft 
on the Apple 11 despite the fact that the 
processor was twice as fast. 

The Apple III BASIC was written 
with a HLL and compiled. There were 
no schematics or source listings 
provided for the Apple III, nor even 
instructions for using the built-in 
system monitor. How could we design 
peripherals or write assembly language 
software (or even fix it if it broke]? 
When the wonderful Apple II came out, 
it was accompanied by all these 
amenities. Furthermore, for the 
assembly language programmer, the 
Apple Ill's memory bank switching was 
a horrible feature. Memory bank 
switching stemmed from Apple's 
choice of the eight bit 6502A. Since the 
6502A could directly address only 64K 
bytes, memory bank switching was 
necessary, and meant that the 
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progiammer had to keep track of which 
bank his subroutine was in (the one 
that he would like to call) and which 
bank he himself was in, when he called 
that subroutine to return to the bank in 
which he had been working. Such 
systems limit the practical size of a 
non-bank switched program to just 
64K--but the Apple EI had 25 6K of bank 
switched RAM! 

Assume momentarily that a 
controlling operating system program 
is 16K bytes long. It can never be 
switched; that would be like jumping 
to an undefined area of memory with 
no meaningful program stored in it. 
Another 16K bytes is allocated to 
program modules which do different 
things, whether in the control system 
or elsewhere, and can be switched as 
needed. This leaves only 32K in a 
standard 64K system for text files. To 
search through a large dictionary, one 
must bank-switch that dictionary in 
from the disk or from another bank of 
RAM memory, 32K bytes at a time. 
The larger the program modules, the 
smaller the text files must be. Imagine 
the frustration of sorting something 
larger than 32K 

Thus, the statement that memory 
bank switching was "horrible"; it's a 
piece of hardware designed to give an 
assembly language programmer 
nightmares, besides being slower than 
storage in a large linear address space, 
such as is available on the 68000. If 
only Apple had used the 68000 in the 
Apple III and had written the system 
software in assembly language they 
would now be in an unassailable 
position, instead of second place and 
dropping. (Significantly, they now use 
the 68000 in their Macintosh, but have 
yet to introduce an operating system 
with any significant amount of 
software to match the chip... but that's 
a different story, having to do with the 
P-System). 

In Motorola's sixteen bit 68000 
microprocessor, the assembly language 
instructions set is similar to the 6502, 
but immensely more powerful. The 
68000 is about one fourth as difficult to 
program in assembly language as the 
6502, yet about four times faster to 
program for any given application. The 
68000 was designed four or five years 
ago with thirty-two bit internal 
architecture, while Intel and Zilog were 
designing their sixteen bit 
microprocessors with sixteen bit 
internal architecture. Because the 
68000 has thirty-two bit internal 
registers, including the address 



counter, it can address sixteen 
megabytes without memory bank 
switching. 

A thirty-two bit address bus implies 
four gigabytes (four thousand 
megabytes) of address space, though 
only twenty-three address lines and 
upper and lower byte address strobes 
are brought outside the chip; hence 
sixteen megabytes. All of the following 
microprocessors can only address 64K 
without memory bank switching: eight 
bit Intel 8088, 80188; sixteen bit Zilog 
Z8000, or Intel 8086, 80186, 80286, 
80386. 

Intel advertises one megabyte-plus 
addressing on these last-mentioned 
chips because they built in that 
horrible bank switching circuitry. Intel 
calls it "segmenting", but the 
programmer still has to do the dirty 
work. The longest internal register 
these chips contain is sixteen bits, 
therefore, the most memory they can 
address is 64K bytes. For this and other 
reasons their assembly language 
instruction set is unorganized and 
inconsistent compared to the 68000. 
[Besides, the 68000 is twice as fast as a 
sixteen bit 8086-not to mention the 
much slower eight bit 8088 IBM uses in 
the IBM PC). 

A fifty dollar 12.5 mhz 68000 is as 
fast as a $150,000 Digital Equipment 
Corporation (DEC) VAX 11/780 CPU. 
Furthermore, the VAX 11/780 can only 
address eight megabytes; the 68000 
addresses sixteen megabytes. It may be 
hard to believe, but it's true. A sixteen 
megahertz version of the 68000 is in 
the sampling stages already. 

Hardware floating point operations 
on the 68000 are three times faster than 
the 8086/8087 combination because 
National Semiconductor's 16081, high 
speed math chip (sixty-four bit floating 
point multiply in twenty three 
microseconds) works faster with the 
68000 than with National's own 
sixteen bit microprocessor.* Software 
written for the present 68000 will have 
a long and useful life because it is 
upwardly compatible with the full 32 
bit address |4 gigabytes) and data bus 
version of the 68000 (the Motorola 
68020). Not only that, but the 68020 is 
four times faster than the 68000. 
Consequently, the 68020 has a three or 
four year head start on software 
compared to any other full 32 bit 

* DTACK GROUNDED, The foumal of 
Simple 68000 Systems. Issue 24, 
Octobet-1983. DTACK GROUNDED 1415 
E. McFadden, Ste. F. Santa Ana, CA 92705 



microprocessor. No other 32 bit 
microprocessor on the horizon is 
sufficiently better or faster than the 
68020 to overcome the software lead 
the 68020 enjoys. 

Unfortunately, greed is still around, 
and getting worse. Most large software 
houses think like this; "Knock it out 
with an HLL — nobody will notice how 
slow it is until after we make a 
killing". Such software houses 
therefore need increasingly faster 
microprocessors so they can justify 
writing new word-processing programs 
and operating systems in a new HLL, 
that was written in an old HLL. 

About two years ago we read an ad 
in "Byte" for theSAGEsupermicro and 
contacted SAGE Computer for 
information. We were initially 
impressed because it came with the 
P-System, wordprocessing, 

spreadsheet, PASCAL and a 68000 
macro assembler, along with an 
assortment of other software. When we 
saw the extensive documentation, the 
schematic, the memory map, the 
powerful system monitor in 16K byte 
EPROM, and the monitor source 
listing-in other words, a completely 
open system-we were sold. 

The experience was like that of a 
few years before, when we were first 
introduced to the Apple n, except that 
with the SAGE we were given an 
extensive assortment of software and a 
built in printer interface just to start up 
our acquaintance. In short, we bought a 
SAGE and have been pleased with the 
supermicro to this day; it has proven its 
reliability and speed. 

We use it with a 6502 macro cross 
assembler to write all our software for 
other uses, and for wordprocessing, We 
were even able to upload 6502 
assembly language text files to the 
SAGE and cross assemble them after a 
few changes with the editor. [An 
unexpected bonus, most welcome). 
BASIC and PASCAL text files were also 
uploaded. The secret to doing this is to 
use the Apple II serial printer interface 
and a free utility on the P-system called 
"TEXTIN". The P-system, program 
editor's replace function is easily used 
to change 6502 assembly language 
pseudo-ops and Applesoft BASIC 
commands to conform to P-system 
language requirements. 

Floppy disk access and load time 
(20K per sec) execute on the SAGE 
about ten times faster than on the 
Apple II disk operating system (DOS), 

(continued on page 51) 
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CAD /CAM! DONT SPEND 25k, 50k 
or $500,000 BEFORE YOU SPEND $79< 



OBJECTIVES 

This book will provide managers, 
engineers, manufacturing personnel 
and any interested persons an 
understanding of the fundamentals of 
Computer Aided Design [CAD] and 
Computer Aided manufacturing [CAM] 
applications and technology. 

PROGRAM 
DESCRIPTION 

The program will expose you to the 
various CAD/CAM terminologies used. 
Hardware and software comparisons 
will be explored with heavy emphasis on 
their advantages and disadvantages. 
Cost justification and implementation 
are presented using case studies. 

WHO SHOULD 
PARTICIPATE 

The course is designed for but not 
limited to: 

— Those managers, engineers and 
research professionals associated with 
the manufacturing industry. 

— Personnel from Product, Tool 
Design, Plant Layout and Plant 
Engineering who are interested in 
CAD/CAM. 

ADVANTAGES- 
END RESULT 

This program will enable participants to: 

1 . Learn basic CAD/CAM Vocabulary. 

2. Better understand the various hard- 
ware and software components us- 
ed in a typical CAD work station. 

3. Select the existing CAD/CAM 
system most appropriate for cur- 
rent and projected needs. 

4. Make an effective cost justification 
as to Why they SHOULD or 
SHOULD NOT implement a 
CAD/CAM system. 



5 . Apply and use computer graphics as 
a productivity tool. 

PROGRAM 
CONTENT 

1 . Introduction 

a. History of CAD/CAM 

b. Importance of CAD/CAM 

2. Graphics work station peripherals 

a. Input 

b. Output 

c. Advantages and disadvantages 
of input and output devices. 

3. Computer Graphics Systems 
[Hardware] 

a. Micros 

b. Minis 

c. Main Frames 

d. Turnkey Graphics systems 

4. Software 

a. Operating systems 

b. Graphics Packages 

c. Graphics Modules 

5. Computer Aided Design 

a. Geometric Definitions 
[Points, Lines, Circles, ETC.] 

b. Control functions 

c. Graphics Manipulations 

d. Drafting Functions 

e. Filing functions 

f . Applications 
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CAD / CAM: 

A PRODUCTIVITY 

ENHANCEMENT TOOL 



6. Implementation 

a. Determining needs 

b. Purchasing and Installing 

c. Getting Started 

7. Cost Justification and Survey 

a. Cost comparisons of two and f 
work station systems. 

b. Presentation of recent survey 
CAD system users 



ZANIM SYSTEMS MAKES THIS SPEC 
OFFER: IF YOU BUY CAD/CAM: 
PRODUCTIVITY ENHANCEMEI 
TOOL BEFORE APRIL 1 5TH, WE W 
INCLUDE FREE0FCHARGEJH£S£1\ 
PAPERS PUBLISHED NATIONALLY 
ZANIM SYSTEMS CAD/CAM EXPER 

1 . "Creation of a Large Data Base 

a Small Graphics System" 

2. "Shortest Path Algorithm Using 

Computer Graphics" 

Of course you could spend as much 
$495, $595 or $695 for a similar 3 
seminar even though this book is nc 
computer program. 

We tell you April 15th for a spe 
reason... this product may be ■ 
deductible depending on your field 
needs. This 1 70 page course will sat 
any of your CAD/CAM needs. ^ 
guarantee it. 



Please send $79 to: 

ZANIM SYSTEMS 
CAD/CAM GROUP 
P.O. BOX 4364 
FLINT, Ml 48504 
[313] 233-5731 

QUANTITY DISCOUNTS AVAILABLE FOR COLLEC 
UNIVERSITIES AND/OR SEMINAR USE. 



Programming 
with 
Macros 



by Patricia Westerfield 



You can make your assembly language more 
efficient, cleaner, easier to debug. 



Introduction 

The techniques and examples described 
in this article use the ORCA/M Macro 
Assembler for the Apple II, from 
Hayden Software Co. The ORG A 
assembler has its own specific macro 
language, explained fully in the 
manual, which allows the programmer 
to write macros tailored specifically to 
his needs. But, because the system sup- 
plies over 150 macros with complete 
subroutine library support, the typical 
assembly language programmer will 
probably never need to write a macro. 
For this reason, this article will focus 
on the ways in which macros can be us- 
ed to enhance and simplify assembly 
language programming, and not the 
symbolics of the macro language. 

Replace HEX Addresses 

The first, and perhaps simplest, reason 
to use a macro is to replace an easily 
forgotten address. The Apple monitor 
contains 32 subroutines, documented 
by Apple, for use by the assembly 
language programmer. These 
subroutines range from generating a 
carriage return to drawing a horizontal 
line of low resolution graphics blocks. 
To access these routines, the correct 
memory location or 6502 registers are 
loaded, followed by a jump to 
subroutine instruction and the hex- 
adecimal number which is the 
subroutine's starting address. The Ap- 
ple monitor will then perform the 
desired functions and return to the in- 
struction immediately following that 
from which it was called. 



The COUT macro is used to il- 
lustrate this point; it prints out the 
character contained in the A register. 
Without a macro, the code to initiate 
this subroutine would look like: 



LDA iC'A' 
JSR $FDED 



In this example the A register is 
loaded with the character 'A'. This is 
followed by the jump to subroutine 
call, which goes to the memory loca- 
tion $FDED where the subroutine in 
the Apple monitor performs the 
necessary instructions to print out the 
'A' character. 

To circumvent the problem of hav- 
ing to remember the 32 hexadecimal 
addresses needed to access the monitor 
subroutines, a macro can be used to 
replace the address with a short name 
which describes the function of the 
subroutine. This name is more easily 
remembered, saving the programmer 
time and reducing the chance of error. 
When using a macro to call the 
character out subroutine, the LDA and 
JSR instructions are replaced by a single 
macro: 



COUTiC'A' 



Replace Repetitive Code 

Another use of macros is to replace 
repetitive bits of code that are too small 



Key to Understanding 

Macros are a group of commands in 
assembly language assigned a 
mnemonic which can then be used 
alone in a program. When the 
program is run, those commands 
assigned to the Macro mnemonic are 
processed in a manner similar to a 
subroutine. Macros become a 
tremendously powerful tool for the 
programmer when the way that they 
can be used is understood. Assembly 
language programming is often 
avoided because of its simplistic and 
tedious nature. But for many 
programmers it has become a 
necessity because of memory 
limitations and the requirement for 
fast programs. Maintaining a 
program or system written in any 
language can be difficult and time 
consuming. Problems encountered 
are compounded when the program is 
written in assembly language. Macro 
instructions change this by enabling 
the programmer to retain the 
efftcency of assembly language while 
providing the capacity to emulate 
some features of higher level 
languages. 

Macros also alleviate debugging 
and other problems by bringing about 
a standardization of code. Operations 
used repeatedly throughout the 
program are handled in the same 
manner, and are, therefore, easily 
identified. The code is much shorter 
with mnemonically named macros 
and considerably easier to read. This, 
combined with the basic comment 
structure all assembers provide, puts 
structured programming within the 
reach of every assembly language 
programmer. 
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to require writing a separate 
subroutine. Suppose a prograrn re- 
quired getting the characters from a 
line one at a time. The code needed to 
get the next character from a line of in- 
put and load it into the A register would 
need to be duplicated in several places 
throughout the program. 

Below is an example of what the 
code to perform this function might 
look like: 

INC CCHAR 
LDX CCHAR 
LDA LINE,X 



A line of input can contain up to 
255 characters. In this example 
CCHAR (current character] is the index 
number of the position in the line the 
computer is looking at. The first in- 
struction increments CCHAR so it is 
now pointing to the next character. 
Next, the line position of the character 
is loaded into the X register and then 
the character X is pointing to is loaded 
into the A register. A desirable alter- 
native to writing these 3 lines of code 
numerous times in the program is to 
define a macro NCHR (next character) 
to perform this function. By using this 
macro each time a new character is 
needed, the number of lines of code the 
programmer will have to write, and 
later wade through when debugging, 
will be decreased significantly. The 
code to execute this would look like: 



NCHR 



Define New Instructions 

New instructions can also be written 
with macros to eliminate the require- 
ment for many different instruction se- 
quences to handle variations of an 
operation. The ADD macro is a case in 
point. Not only can variable parameters 
be passed, designating different 
numbers and locations to be operated 
on, but the macro will optimize the add 
by skipping unnecessary instructions. 

The following code illustrates a 
typical two byte add in assembly 
language: 

CLC 

LDA NUMl 

ADC NUM2 

STA NUM3 

LDA NUMl+1 



ADC NUN2+1 
STA NUM3+1 



The first step in performing the add 
operation is to clear the carry flag. In 
this example, the low bytes of the 
numbers contained in NUMl and 
NUM2 are added together and stored in 
the location designated here as NUM3. 
This is followed by an add of the high 
bytes of the numbes contained in 
NUMl and NUM2 which is stored in 
the high byte of NUM3. The total 
number of bytes needed to perform this 
add is 19 (assuming that no variables 
are in page zero). 

The ORCA assembler provides an 
ADD macro which replaces these 7 
lines of code with one while 
duplicating the above operation: 

ADD NUM1,NUN2,NUM3 

The macro performs the same 2 
byte add and stores the result in 
NUM3. The macro also required 19 
bytes. 

The ADD macro in ORCA will 
always do a 2 byte add, but when ad- 
ding a 1 byte immediate number to a 2 
byte number, the standard shortcut is 
automatically taken. 
• What follows is the code needed to 
add 4 to NUMl without macros: 



CLC 

LDA NUMl 

ADC #4 

STA NUMl 

BCC PAST 

INC NUMl+1 
PAST ANOP 



After the carry flag has been cleared 
the 4 is added to the low byte of the 
number stored in the location NUMl. 
The next step is to increment the high 
byte of NUMl if the first add resulted 
in an overflow. Notice that in this ex- 
ample the sum of the two numbers is 
returned to the location NUMl. The 
total number of bytes required to per- 
form this operation is 16, assuming no 
zero page locations. 

To illustrate the fact that the ADD 
macro will take the shortcut when ap- 
plicable, the same ADD macro is used, 
this time with the GEN ON directive in 
place. This directive is provided with 
the ORCA assembler. When it is turned 
on at the beginning of the program all 
the lines generated by the macro expan- 



sion are printed in the output listing. 
These lines of code are preceded by a 
' + ' . Notice that the following lines of 
code are basically the same as those 
above: 





ADD 


NUMl.iC 


+ 


CLC 




+ 


LDA 


NUMl 


+ 


ADC 


#<^ 


+ 


STA 


NUMl 


+ 


BCC 


SL2 


+ 


INC 


NUMl+1 


+SL2 


ANOP 





If the carry flag is clear after the low 
bytes of the two numbers are added 
together, the high byte of NUMl is not 
incremented. Instead the assembler 
branches around this instruction to the 
label SL2 which is a ANOP (assembler 
no-operation). Because the ADD macro 
was able to recognize and use the stan- 
dard assembly language shortcut, a sav- 
ings of 3 bytes resulted. At first glance 
this may not appear to be a significant 
savings, but when the number of times 
these macros are used in a large pro- 
gram is taken into account, the savings 
in space and the speed up during 
assembly time become significant. 

Notice that the two previous ex- 
amples used the same ADD macro to 
perform two different types of add: 

ADD NUM1.NUM2.NUM3. 

ADD mm.H 

The ADD macro, like many other 
macros in ORCA, allows variable 
parameters to be passed to the macro. 
In the first example the result of the 
add is stored in NUM3. If a destination 
is not specified, as in the second case, 
the result is stored in the first location 
by default, in this case NUMl. This 
feature alone saves the programmer 
from having to code many different in- 
struction sequences to do basically the 
same operation, thereby adding to the 
efficency of assembly language pro- 
gramming. 

Shorten Code 

Macros also shorten the number of 
lines of code in a program, making it 
easier to read and less prone to error. 
This also speeds up program develop- 
ment: an oft quoted result of several 
studies on programming is that a pro- 
grammer programs a constant number 
of lines of code per hour, regardless of 
the language. By reducing the number 
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of lines of code, program development 
speeds up. 

The following statements load the 
address of a two byte number AD2 into 
ADl least significant byte first; 

LDA #< AD2 

STA ADl 

LDA #> ADZ 

STA ADl+1 



These 4 lines of code can be replaced by 
the load address macro, LA: 

LA AD1,AD2 

thus performing the same function 
without extra lines of code. 

Hide Confusing Code 

A major advantage to programming in 
Pascal or another high level language, 
rather than in assembler, is the ability 
to give a function or procedure a name 
which clearly describes the operations 
being performed. Because of the 
simplistic nature of assembly language 
the purpose of even a few lines of code 
can become difficult to discern a very 
short time after the code has been writ- 
ten. 

The ORCA PRINT macro hides 
what can be confusing lines of code 
while at the same time stating clearly 
the procedure to be performed. The 
macro is straightforward, emulating its 
BASIC counterpart by writing out the 
characters contained in ticmarks: 

PRINT 'A LINE OF OUTPUT' 

would result in 

A LINE OF OUTPUT 

printed out to the CRT or the printer, 
whichever was specified by the pro- 
grammer. The expansion of this macro 
would look like: 





PRINT 'A LINE OF 




OUTPUT' 


+ 


JSR SHITE 


-1- 


DC H'80',I1'L:SL2' 


+SU 


DC C'ALINEOF 




OUTPUT' 



The macro statements generated, 
the ones preceded by the ' + ' , show the 
steps the PRINT macro takes to per- 
form its task. First a jump to 
subroutine call is made to SRITE, 
which is contained in the system 
library. This is followed by two DC 
(declare constant) assembler directives. 



These statements tell the subroutine 
the length of the output and whether or 
not a return needs to be generated after 
the line of output is printed. These 
three lines handle a number of tedious 
coding steps the programmer would be 
required to code if this macro was not 
available. The efficency of assembly 
language is retained, while at the same 
time it is possible to achieve some of 
the advantages of a higher level 
language. 

Standardize Code 



A great deal of confusion can be 
eliminated through standardization of 
code using Macros. Consider Fig. 1 and 
Fig. 2. Both of these subroutines per- 
form the same task, that of printing a 
menu on the screen and accepting user 
inputs. Fig. 1 is written in straight 
assembly code, while Fig. 2 uses 
macros and and implements a simple 
commenting structure. An experienced 
assembly language programmer would 
be required to decipher the purpose of 
the code in Fig. 1. The macros and com- 
ments used in the example in Fig. 2 
enable the main points of the 
subroutine to be understood even by 
programmers unfamiliar with assembly 
language. 

Alternate Instruction Sets 

Another feature macros provide, useful 
to the advanced programmer, is the 
abiUty to write alternate instruction 
sets. An excellent example of this is a 
cross assembler which would allow 
code written using the ORCA 6502 
Assembler to be run on another 
microprocessor such as the 6809. The 
gap between these instruction sets is 
bridged with macros. 

The only major problem that arises 
when writing a cross assembler in- 
volves handling identical instructions 
which assemble differently on each 
microprocessor. To get a better idea of 
the problem, consider the RTS (return 
to subroutine) instruction on the 6502 
and the 6809. The RTS on the 6502 is 
equivalent to a hex 60 while the RTS on 
the 6809 is the same as a hex 39. In 
order for the assembler to distinguish 
which RTS is meant to be used at a 
given time there must be a way to 
separate the instraction sets. The first 
way to solve this problem is to code all 
6809 instructions in lowercase and 
leave all 6502 instructions in upper- 
case; 



Another way is to precede each 6809 op 
code with an identifier, such as a ' . ' ; 
.RTS 

Macro Libraries 

The ORCA assember's macro library 
provides a collection of standard 
macros which can be used to perform 
common functions. Because these 
macros come with the system, they 
need need not be receded for each pro- 
gram. 

To use the macros effectively, the 
programmer builds a small library of 
the macros used in a particular pro- 
gram. This file takes very little time to 
colate and speeds up the assembly of 
the program. With a separate macro 
library the assembler only has to search 
through the macros needed by the pro- 
gram, and not the entire 150 macros 
provided with the system. 

Subroutine Libraries 

In order for macros to be of optimum 
use to the programmer they must be 
backed up with subroutine libraries. 
The reason for a subroutine library 
becomes apparent when the SUB (sub- 
tract) macro is compared to the MULT 
(multiply) macro. With the GEN ON 
directive in place at the beginning of 
the program the code the subtract 
macro would generate would look like; 





SUB 


NUM1,NUM2 


+ 


SEC 




+ 


LDA 


NUMl 


+ 


SBC 


NUM2 


+ 


STA 


NUMl 


+ 


LDA 


NUMH-l 


+ 


SBC 


NUM2-I-1 


+ 


STA 


NUMl-i-1 



Compare this with the multiply macro; 



rts 





MULT 


NUM1,NUM2 


+ 


ANOP 






+ 


LDA 


NUMl 


move NUMl to 


+ 


STA 


MIL 


mult reg 


+ 


LDA 


NUMl-i-1 




+ 


STA 


MIH 




+ 


LDA 


MUN2 


move NUM2 to 


+ 


STA 


M3L 


other mult re 


+ 


LDA 


NUM2+1 




+ 


STA 


M3H 




+ 


JSR 


SMULT 


perform 
multiply 


+ 


LDA 


MIL 


move answer to 


+ 


STA 


NUMl 


NUMl 
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Listing 1 










O 








GT5 RTS 


^ SMENU 


KEEP 


MENU,V10 




MSGl DC C'MENU' 


START 






MSG2 DC C 1) CATALOG' 


PRBL 


EQU 


IF94A 


PRINT BUNKS 


MSG3 DC C 2) LOAD A FILE' 


HOME 


EQU 


IFC58 


MONITOR 


MSG4 DC C 3) QUIT' 


o 






HOME ROUTINE 


MSG5 DS 


RDKEY 


EQU 


IFDOC 


READ KEYBOARD 


END 


CROUT 


EQU 


IFD8E 


DO CARRIAGE 
RETURN 


KEEP MENU,V10 


O BELL 


EQU 


IFF3A 


RING BELL 


MCOPY MENU, MACROS, V10 




JSR 


SINIT 




» » 


qMNI 


JSR 


HOME 


WRITE MENU 


* SMENU - PRINT MENU ON SCREEN AND » 


LDX 


20-(MSG2-MSGl)/2 


* ACCEPT USER INPUTS » 




JSR 


PRBL 




» » 




LDX 


MSGl 




»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»»*»»»»»» 


o 


LDA 


MSG 




» 




LDY 


MSG2-MSG1 




SMENU START 




JSR 


SRITE 




J 


o 


JSR 


CROUT 




; WRITE MENU 


JSR 


CROUT 




} 




LDX 


MSG2 




JSR SINIT 




LDA 


MSG2 




MNl HOME 


o 


LDY 


MSG3-MSG2 




PRINTC 'MENU' 




JSR 


SRITE 




CROUT 




JSR 


CROUT 




PRINT ' 1) CATALOG' 




LDX 


MSG3 




CROUT 


o 


LDA 


MSG3 




PRINT ' 2) LOAD A FILE' 




LDY 


MSG4-MSG3 




CROUT 




JSR 


SRITE 








JSR 


CROUT 




PRINT • 3) QUIT' 


o 


LDX 


MSG4 




CROUT 




LDA 


MSG4 




CROUT 




LDY 


MSG5-MSG4 




J 





JSR 


SRITE 




; GET AND INTERPRET USER INPUT 


JSR 


CROUT 




J 




JSR 


CROUT 




GTl RDKEY CRS GET A LEGAL INPUT 
CMP '1' 


O GTl 


JSR 


RDKEY 


GET A LEGAL 
INPUT 


BLT GT2 
CMP '4' 




CMP 


'1' 




BLT GT3 




BLT 


GT2 




GT2 BELL ERROR FOUND 


o 


CMP 

BLT 


'4' 
GT3 




JMP GTl 


GT2 


JSR 


BELL 


ERROR FOUND 


GT3 CMP '1' CATALOG THE DISK 


o 


JMP 


GTl 




BNE GT4 








JSR SCTLG 


GT3 


CMP 
BNE 


'1' 
GT4 


CATALOG THE DISK 


JMP MNl 


o 


JSR 


SCTLG 




GT4 CMP '2' LOAD A FILE 




JMP 


MNl 




BNE GT5 
JSR SLOAD 


qGT4 


CMP 


>2> 


LOAD A FILE 


JMP MNl 


B>fE 


GT5 








JSR 


SLOAD 




GT5 RTS QUIT 




JMP 


MNl 




END 


O 










o 










o 
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IDA MIH 
STA NUMl+1 



Both of these macros generate these 
lines of code in the program at the place 
where they are use. Notice however 
that the SUB macro completed the en- 
tire operation in 7 lines of code. On the 
other hand the MULT macro merely 
set up the numbers given it in a stan- 
dard format and called the multiply 
subroutine [JSR SMULT) to perform 
the calculation. The fact that a 
subroutine library was called from a 
macro means that the dozens of lines of 
code in that subroutine are not 
generated each time the macro is call- 
ed; instead it is stored in one place in 
memory, thus cutting down the 
amount of memory the program re- 
quires in order to run. 

The beauty of subroutine libraries 
lies in the fact that they are 



preassembled, and therefore never need 
to be assembled again. The subroutines 
required by the program are 
automatically linked in at assembly 
time by the link editor. For this reason 
no assembly time is lost on these 
subroutines. 

The concept of subroutine libraries 
can be invaluable to a programming 
shop involved with software develop- 
ment. Only a central shop is required to 
develop and maintain the system 
libraries. Because not everyone has the 
source code to these libraries it 
becomes difficult to alter code, which 
is (presumably) known to be error free. 
At the same time interfacing with these 
routines becomes standard, thereby 
making the finished program easier to 
maintain and update. 

Conclusions 

The macros supplied with the ORCA 
system effectively extend the 6502 



assembly language instruction set to 
over 200 instructions. Many instruc- 
tions not commonly found in the 6502 
assembly language, like PRINT and 
HOME, are now available to the pro- 
grammer via macros. Areas where the 
processor was inadequate, including 
I/O and arithmetic, are handled with 
ease. Because of these added instruc- 
tions, assembly language is no longer 
tedious and difficult to use. Instead, it 
approaches the simplicity of a higher 
level language. 

Through macros, the full potential 
of programming in assembly language 
is reached. Macros enable the program- 
mer to write fewer lines of code to ac- 
complish a given task, and to do so in a 
precise and straightforward way. For 
this reason assembly language need no 
longer be feared by the average pro- 
grammer; instead, it becomes a 
language within the grasp of everyone. 

iMCftO 



Supermicros 

(continued fiom page 45) 

and BASIC programs run four times 
faster than on IBM's Personal 
Computer. It is as fast to program in 
high level compiler languages as using 
interpreters on 8-bit machines. Our 
6502 assembly language programming 
productivity doubled. 

With an unexpanded, 25 6K SAGE 
II, you can plug in your own 64K bit 
dynamic RAM chips for 5 12K bytes and 
your own second Mitsubishi floppy 
disk drive; sockets, cables and 
connectors are provided with the 
unexpanded machine. One hundred 
and fifty nanosecond, 64K bit RAM 
chips cost about six dollars each at the 
present, and 36 chips make up 25 6K of 
RAM memory. 

The video display and keyboard 
aren't built-in on the SAGE, unlike the 
Apple II; a separate RS232 serial 



terminal is required. However, not 
having a built-in display and keyboard 
can be advantageous, because the user 
only pays for what he needs. Separate 
19. 2K baud serial terminals are also 
faster than most built-in hi-res bit- 
mapped displays. This is due to the 
dedicated CPU in the terminal that has 
nothing else to do but update the screen 
while bit mapped displays are usually 
updated by the main CPU. (Multi- 
processing if you will). It has 640K on 
each floppy disk drive, 5I2K of parity 
RAM and 24 bit address, 16 bit data 
bus, expansion connectors. It comes 
with a built-in Centronics parallel 
printer port, an IEEE-488 port and two 
RS-232 serial ports, one which is used 
with the terminal, the other already set 
up for a modem. Options include hard 
disk up to forty megabytes and a six- 



user system with 1 megabyte RAM. 

Several other operating systems will 
mn on the SAGE, including CP/M 
68K, Mirage, PDOS, BOS/5, MBOS/5 
and Idris (a UNIX-like operating 
system) . Languages that run under the 
standard and optional operating 
systems are several versions of 
Fortrans, BASIC, ADA, Forth, Cobol, 
Microcobol, APL, Modula II and 
several "C"s. 

Here's the most serious advice to 
anyone contemplating writing 
software: write it in assembly language 
for the 68000. The 68000 and its 
derivatives will become the de facto 
standard microprocessors for at least 
the next ten years, despite IBM's 
temporary lead with the 8088. 

iMCRO 
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Useful Functions 



Editor's Note: The following piogiam 
is given in its entirety to illustzate one 
way of setting up a progican to easily 
access vaiious defined functions. In the 
next two issues, progiams 2 and 3 will 
be pubhsbed in their entirety. We 
invite you to send in any defined 
functions you may be using that are not 
mentioned. The submissions we 
receive will be collected and pubhshed 
in a future issue. 



Many of us, depending on what we do 
for a living, find that we must use a 
variety of arithmetic formulas, and 
more often than not we're faced with 
the task of looking them up in some 
book or other research material, after 
which we must key them into our 
computer or calculator making sure 
that they're exactly correct. That can, 
on occasion, become quite a task when 
the formula involved includes a half 
dozen pairs of parentheses or other 
complicated combinations of fixed and 
variable values. A typical example of 
such a formula is shown below. Such 



by Paul Garrison 



Save time and mathematical aggravation with this 
compilation of defined functions in a very friendly 
program. 



lengthy arithmetic expressions simply 
invite errors. 

The programs that make up the 
main portion of this article are designed 
to simplify the task. They are made up 

61 DEF FNDENALT(PA,F) = (l';5'i26» 

(1-(((288.15-PA».001981)/288.15) 

t5.2563/((273.15+F)/288.15)) 

t.235)) 

of 60-odd user-defined functions 
representing all of the arithmetic 
expressions that I have ever needed in 



the more or less technical writing that I 
have done. 

In addition, all three include a group 
of three subroutines and an END line 
(lines 130 through 160| that I 
automatically put in all the programs I 
write. My reason for dividing the 
functions into three separate programs 
is based on the need to keep them 
within a 48K limit, or rather the 
14-plus K limit that is available with a 
48K RAM when MBASIC is loaded into 
the computer. 

The programs consist of the actual 
functions (lines 1 to 99), where the line 
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numbers are not duplicated in the three 
programs in order to be able to merge 
portions of the programs into new 
programs without getting involved 
with a confusion of line numbers, the 
subroutines (lines 130 thru 160), a 
menu (lines 200 thru 400) plus a means 
of using all of the defined functions in 
order to perform a given calculation 
with optional variables. The three 
programs are recorded on a disk that 
also contains the CP/M system, 
MBASIC and the CP/M PIP program 
which simplifies the task of copying 
them onto another disk where they can 
then be merged with a new program. 
Since it is unlikely that all of the 
functions will be used in such a 
program, it is then a simple matter to 
delete those functions and other 
material not applicable to the program 
being written. 

The programs are written in the 
Apple version of Microsoft BASIC-80 
(MBASIC), using the WordStar 
wordprocessor. The changes that must 
be made in order to translate them into 
other versions of BASIC are described 
below. 



Other BASIC Dialects 

VARIABLE NAMES: BASIC-80, TI 
BASIC, TI EXTENDED BASIC, Atari 
BASIC and some other versions will 
recognize 40 or more characters in a 
variable name, while Applesoft, 
TRS-80 and several others recognize 
only the first two characters (plus the $ 
in case of string variables). Therefore, 
variable names that exceed two 
characters may have to be examined in 
order to avoid inadvertant duplication. 
For instance, Applesoft and TRS-80 
would look at BOLD and BOLT and 
read both as BO. 

MULTIPLE STATEMENTS PER 
LINE: In most versions of BASIC, 
multiple statements on one line, 
separated by a colon (:) are permitted. 
In TI BASIC, multiple statements per 
line are not accepted. In TI 
EXTENDED BASIC, multiple 
statements must be separated by two 
colons(::). 

INPUT WITH PROMPT 

STATEMENT: Most versions of BASIC 
accept INPUT followed by a prompt 
statement in quotation marks. In 
BASIC-80, the prompt statement may 
be followed by a semicolon, resulting 
in a displayed question mark (?), or by a 



comma eliminating the question mark. 
In Applesoft and TRS-80, the prompt 
statement must always be followed by 
a semicolon. In both versions of TI 
BASIC, the prompt statement must be 
followed by a colon. Atari does not 
permit a prompt line after INPUT. 
Instead, the prompt must be used as a 
PRINT line, followed by INPUT and 
the variable[s). 

DEFINED FUNCTIONS: BASIC-80 
uses DEF FNABCjX) with no space 
between FN and the function name 
ABC(X). In Applesoft, it can be typed 
without a space, but the computer will 
insert a space automatically, resulting 
in FN ABC(X). The two TI B ASICs do 
not use FN. Instead DEF ABC(X) is 
used to define ABC. In the reference 
books for TRS-80 and Atari, I have been 
unable to find the DEFine command. 
The way to get around that is to simply 
assign an arithmetic expression to a 
variable name,- ABC=1/A would, 
when ABC is PRINTed, display the 
reciprocal of the value assigned to the 
numeric variable A. In that case no 
variables in parentheses can be used 
because the computer would recognize 
that as an array, and would respond 
with a SUBSCRIPT OUT OF RANGE 
error message if the variable in 
parentheses exceeds the maximum 
allowable number and no prior DIM 
statement was encountered. 

TO CLEAR THE SCREEN: 

BASIC-80 and Applesoft use HOME to 
clear the screen. TRS 80 uses CLS for 
the purpose. With computers that do 
not include a clear-screen command, 
use FOR X=l TO L:PRINT:NEXT X 
where L is the number of lines 
displayed on the screen. The two TI 
BASICS use CALL CLEAR for that 
purpose. 

TAB(X) and VTAB(X): In the TI 

BASICS, the TAB(X) statement must be 
followed by a semicolon. In some 
versions of BASIC TAB and/or VTAB 
are not available. In that case, spaces 
within parentheses can be used to 
effect the TAB position and FOR X = 1 
TO Z:PRINT:NEXT X can be used to 
move the text to a given vertical 
position on the screen, represented by 
the value of Z. 

There are other differences between 
the versions of BASIC used by different 
computer makes and models, but these 
are the only ones used in the programs 
reproduced here. 



PROGRAM #1 

This program contains the 
mathematical formulas for all versions 
of SINE, TANGENT, and SECANT that 
are not built in functions (such as 
SIN(X), COS(X), TAN(X) and ATN(X)) 
automatically available on all 
microcomputers. In addition, it 
contains conversions of degrees to 
radians and vice versa which are 
frequently needed in conjunction with 
the others. 

Lines 2 and 3 assign standard values 
to PI and RAD. Lines 16 through 37 use 
the DEF FN statement to create the 
user-defined functions. Lines 100 
through 160 are the lines that I use at 
the beginning of all my programs. Lines 
200 through 400 contain the menu that 
allows you to use any of the defined 
functions to perform a given 
calculation, using your own variables. 
Line 420 sends the computer to the 
appropriate line number based on the 
selection made from the menu. And 
lines 690 through 1560 are used to 
perform the different calculations. 

PROGRAM #2 

This program includes the formulas for 
trigonometric ratios, two formulas 
dealing with matters related to aviation 
(the effect of wind on ground speed and 
density altitude), the formulas for 
converting temperatures from 
Fahrenheit to Celsius and vice versa, 
plus the formulas that comprise Ohm's 
Law and determine the resistance 
factor of electrical wires, and finally 
the formula that determines future 
values based on compound interest, 
present value and the time span to be 
examined. The structure of the 
program is identical to the one 
described above. See editor's note. 

PROGRAM #3 

This program contains a variety of 
formulas, such as those used to 
determine the lesser, greater or average 
value of two variables, rounding off 
figures to a given number of decimals, 
polar-to-rectangular and rectangular-to- 
polar conversions, figuring roots of any 
variables (square root, cube root and so 
on), determining the reciprocal of any 
number, and determining the surface 
areas and volumes of cubes, rectangular 
shapes, spheres, pyramids and 
cylinders. Beyond that the program is 
structured like the others, except that 
the menu is at the end (lines 2000 and 
up). See editor's note. JUQJO' 
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1 REM FUNCTIONS (DELETE THOSE NOT USED IN A PROGRAM) 

2 PI=3. 14159 

3 RAD=57.2958 

16 DEF FNARCSIN(A)=ATN(A/SQR(-A»A+1)): 

17 DEF FNSINH(A)=(EXP(A)-EXP(-A))/2: 

18 DEF FNARCCOS(A)=-ATN(A/SQR(-A»A+1))+1.5708: 

19 DEF FNC0SH(A)=(EXP(A)+EXP(-A))/2: 

20 DEF FNC0T(A)=1/TAN(A): 

21 DEF FNARCCOT(A)=ATN(A)+1.5708: 

22 DEF FNTANH(A)=EXP(-A)/(EXP(A)+EXP(-A))»2+1: 

23 DEF FNC0TH(A)=EXP(-A)/(EXP(A)-EXP(-A))*2+1: 

24 DEF FNSEC(A)=1/C0S(A): 

25 DEF FNCSC(A)=1/SIN(A): 

26 DEF FNARCSEC(A)=ATN(A/SQR(A»A-1))+SGN(SGN(A)-1)»1.5708:REM ARCSECANT 

27 DEF FNARCCSC(A)=ATN(A/SQR(A*A-1))+(SGN(A)-1)*1.5708; REM ARCCOSECANT 



Listing for Program 1 

REM ARCSINE 

REM HYPERBOLIC SINE 

REM ARCCOSINE 

REM HYPERBOLIC COSINE 

REM COTANGENT 

REM ARCCOTANGENT 

REM HYPERBOLIC TANGENT 

REM HYPERBOLIC COTANGENT 

REM SECANT 

REM COSECANT 



28 DEF FNSECH(A)=2/(EXP(A)+EXP(-A)): 

29 DEF FNARCSINH(A)=L0G(A+SQR(A»A+1)): 

30 DEF FNARCC0SH(A)=L0G(A+SQR(A*A+1)): 

31 DEF FNARCTANH(A)=L0G((l+A)/l-A)/2: 

32 DEF FNARCSECH(A)=L0G((SQR(-A»A+1)+1)/A): 

33 DEF FNARCC0TH(A)=L0G((A+l)/(A-l))/2: 

34 DEF FNARCSCSH(A)=L0G((SGN(A)*SQR(A»A+1)+1)/A); 

36 DEF FNDEG(A)=A» (PI/180): 

37 DEF FNRAD(A)=A/(PI/180): 
120 GOTO 200 

130 ? " 



REM HYPERBOLIC SECANT 
REM HYPERBOLIC ARCSINE 
REM HYPERBOLIC ARCCOSINE 
REM HYPERBOLIC ARCTANGENT 
REM HYPERBOLIC ARCSECANT 
REM HYPERBOLIC ARCCOTANGENT 
REM HYPERBOLIC ARCCOSECANT 
REM DEGREES TO RADIANS 
REM RADIANS TO DEGREES 



-":RETURN 



REM TESTING FUNCTIONS 



210 


?1,' 


220 


?2,' 


230 


?3,' 


240 


?4,' 


250 


?5,' 


260 


?6,' 


270 


?7, ' 


280 


?8,' 


290 


?9,' 


300 


?10, 


310 


?11, 


320 


?12, 



140 HOME : VTAB ( 10 ) : RETURN 

150 ?: INPUT "Press > RETURN< (Q to quit) ",R| 

155 IF R$="Q" THEN 160 ELSE RETURN 

160 GOSUB 140:GOSUB 130: ?TAB (33) "End. ":GOSUB 130: END 

190 

200 GOSUB 140:? "Menu: ":GOSUB 130 

"Arcslne" 

"Hyperbolic sine" 

"Arccosine" 

"Hyperbolic cosine" 

"Cotangent" 

"Arccotangent" 

"Hyperbolic tangent" 

"Hyperbolic cotangent" 

"Secant" 
"Cosecant" 
"ArcsecEint" 

"Arccosecant": GOSUB 130 
322 ?"To choose one of the above, press >RETURN< " 
324 INPUT "To see other choices, press > Y < ",Z| 
326 IF Z|="Y" THEN GOSUB 130:GOTO 330 ELSE GOSUB 130:GOTO 4l0 
330 ?13, "Hyperbolic secant" 
340 ?14, "Hyperbolic arcsine" 
350 ? 15, "Hyperbolic arccosine" 
360 ? 16, "Hyperbolic arctangent" 
370 ? 17, "Hyperbolic cosecant" 
380 ? 18, "Hyperbolic arccotangent" 
390 ? 19, "Hyperbolic arccosecant": GOSUB 130 
392 ?20, "Convert degrees to radians" 
394 ?21, "Convert radians to degrees": GOSUB 130 
400 ?22,"Exit program": GOSUB 130 
410 INPUT "Which? ", WHICH: GOSUB 140 
420 ON WHICH GOTO 690,730,770,810,850,890,930,970,1010,1050,1090,1130,1170,1210, 

1250,1290,1330,1370,1410,1490,1530,160 
690 ?"Find the arcsine of a number":GOSUB 130 
700 INPUT "Enter any number ",A 

710 X=FNARCSIN(A):GOSUB 130 
720 PRINT "The arcsine of ";A; " is 



";X: GOSUB 150: GOTO 200 



730 ?"Find the hyperbolic sine of a number":GOSUB 130 



740 INPUT "Enter any number 

750 X=FNSINH(A): GOSUB 130 

760 PRINT "The hyperbolic sine of ";A;" is 

770 ?"Find the arccosine of a number ": GOSUB 130 

780 INPUT "Enter any number 

790 X=FNARCCOS(A):GOSUB 130 

800 PRINT "The arccosine of ";A; " is 



",A 

";X: GOSUB 150: GOTO 200 



",A 



";X: GOSUB 150: GOTO 200 
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Listing 1 


(continued) 810 ?"Find the hyperbolic cosine of a number":GOSUB 130 
820 INPUT "Enter any number ",A 
830 X=FNCOSH(A):GOSUB 130 






840 PRINT "The hyperbolic cosine of ";A;" is ";X:GOSUB 150:GOTO 200 







850 ?"Find the cotangent of a number ": GOSUB 130 






860 INPUT "Enter any number ",A 






870 X=FNCOT(A):GOSUB 130 







880 PRINT "The cotangent of ";A;" is ";X:GOSUB 150:GOTO 200 




890 ?"Find the arccotangent of a nuraber":GOSUB 130 






900 INPUT "Enter any number ",A 






910 X=FNARCCOT(A) : GOSUB 130 







920 PRINT "The arccotangent of ";A;" is ";X:GGSUB 150:GOTO 200 






930 ?"Find the hyperbolic tangent of a number ": GOSUB 130 






940 INPUT "Enter any number ",A 






950 X=FNTANH(A):GOSUB 130 







960 PRINT "The hyperbolic tangent of ";A; " is ";X:GOSUB 150:GOTO 200 






970 ?"Find the hyperbolic cotangent of a number":GOSUB 130 






980 INPUT "Enter any number ",A 







990 X=FNC0TH(A):GOSUB 130 




1000 PRINT "The hyperbolic cotangent of ";A; " is ";X:GOSUB 150:GOTO 200 






1010 ?"Find the secant of a number":GOSUB 130 






. 1020 INPUT "Enter any number ",A 


© 




1030 X=FNSEC(A):GOSUB 130 






1040 PRINT "The secant of ";A;" is ";X:GOSUB 150:GOTO 200 






1050 ?"Find the cosecant of a number":GOSUB 130 







1060 INPUT "Enter any number ",A 




1070 X=FNCSC(A):GOSUB 130 






1080 PRINT "The cosecant of ";A; " is ";X:GOSUB 150:GOTO 200 






1090 ?"Find the arcsecant of a number":GOSUB 130 







1100 INPUT "Enter any number ",A 






1110 X=FNARCSEC(A):GOSUB 130 






1120 PRINT "The arcsecant of ";A; " is ";X:GOSUB 150:GOTO 200 






1130 ?"Find the arccosecant of a number":GOSUB 130 


© 




1140 INPUT "Enter any number ",A 






1150 X=FNARCCSC(A):GOSUB 130 






1160 PRINT "The arccosecant of ";A;" is ";X:GOSUB 150:GOTO 200 







1170 ?"Find the hyperbolic secant of a number":GOSUB 130 




1180 INPUT "Enter any number ",A 






1190 X=FNSECH(A):GOSUB 130 






1200 PRINT "The hyperbolic secant of ";A;" is ";X:GOSUB 150:GOTO 200 







1?10 ?"Find the hyperbolic arcsine of a number":GOSUB 130 






1220 INPUT "Enter any number ",A 






1230 X=FNARCSINH(A) .'GOSUB 130 







1240 PRINT "The hyperbolic arcsine of ";A;" is ";X:GOSUB 150:GOTO 200 




1250 ?"Find the hyperbolic arccosine of a number":GOSUB 130 






1260 INPUT "Enter any number ",A 






1270 X=FNARCCOSH(A):GOSUB 130 







1280 PRINT "The hyperbolic arccosine of ";A; " is ";X:GOSUB 150:GOTO 200 






1290 ?"Find the hyperbolic arctangent of a number":GOSUB 130 






1300 INPUT "Enter any number ",A 






1310 X=FNARCTANH(A): GOSUB 130 







1320 PRINT "The hyperbolic arctangent of ";A; " is ";X:GOSUB 150:GOTO 200 






1330 ?"Find the hyperbolic arcsecant of a number":GOSUB 130 






1340 INPUT "Enter any number ",A 







1350 X=FNARCSECH(A):GOSUB 130 




1360 PRINT "The hyperbolic arcsecant of ";A;" is ";X:GOSUB 150:GOTO 200 






1370 ?"Find the hyperbolic arccotangent of a number":GOSUB 130 






1380 INPUT "Enter any number ",A 







1390 X=FNARCCOTH(A):GOSUB 130 






1400 PRINT "The hyperbolic arccotangent of ";A; " is ";X:GOSUB 150:GOTO 200 






1410 ?"Find the hyperbolic arccosecant of a number". -GOSUB 130 






1420 INPUT "Enter any number ",A 







1430 X=FNARCSCSH(A):GOSUB 130 






1440 PRINT "The hyperbolic arccosecant of ";A;" is ";X:GOSUB 150:GOTO 200 






1490 ? "Convert degrees to radians": GOSUB 130 







1500 INPUT "Enter number of degrees ",A 






1510 X=FNDEG(A):GOSUB 130 






1520 PRINT A;" degrees equal ";X; " radians": GOSUB 150:GOTO 200 






1530 ? "Convert radians to degrees": GOSUB 130 







1540 INPUT "Enter number of radians ",A 






1550 X=FNRAD(A) :GOSUB 130 






1560 ?A; " radians equal ";X;" deprees ": GOSUB 150:GOTO 200 
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Apple He Supplement 

to 
What^s Where in the Apple 

by Phil Daley 



A.l 
Overview 

The latest Apple II, called the "//e" for 
"enhanced", has several features added that 
make it more standard and versatile. The 
keyboard has been improved and will now 
generate all 128 ASCII key codes, including 
screen display of lower case. The RESET key now 
requires pressing the CONTROL key 
simultaneously and rebooting can be accomplish- 
ed by pressing CTRL-OPEN APPLE-RESET, sav- 
ing wear and tear on the on/off switch, always a 
weak point. A CTRL-CLOSED APPLE RESET 
initiates a built-in self-test. The screen display 
has been improved to allow either 40 or 80 col- 
umn display under software control. There is also 
a full cursor control in all four directions. The 
16K language card has been made a built-in 
feature and slot has been eliminated. Inter- 
national versions are available for European and 
Asian buyers with switchable character sets. 

Despite all these additional features, 
compatability was kept with most of the previous 
software. All of the standard monitor entry points 
were preserved so that, unless software uses un- 
documented monitor entries, it should run on the 
//e. The only other problem that might arise is 
the utilization of one formerly unused page zero 
location. A program that used that location will 
probably not function properly on the new Apple. 

Another new feature is the addition of a 64K 
expansion available as an enhanced 80 column 
card, which will make additional memory 
available to sophisticated programs such as 
Visicalc. 

A.2 

A Third Apple Monitor 

There is now a third major version of the 
Apple monitor to go along with the Auto-Start 
and (old) System monitors. While all of the 
documented entry points remain the same, most 
of the routines jump to the new ROM in the 
$C100-$CFFF range. These new routines check 
on the availability and status of 80 column and 



extended 80 column cards, and use this additional 
hardware for enhanced displays and cursor 
control, when available. 

The major differences between the n + and the 
//e are as follows: 

a) RESET, OPEN APPLE and CLOSED APPLE 
keys: The Control key must now be pressed to 
initiate the RESET cycle. This will eliminate ac- 
cidental RESETS as the keys are on opposite sides 
of the keyboard. The APPLE keys are paddle 
button extensions to the keyboard and can be 
used in conjunction with the RESET cycle to in- 
itiate the self diagnostic tests (CLOSED) or 
power-on reboot (OPEN) . 

b) EDITING: In addition to the I, J, K, and L 
diamond cursor control pattern, there are four ar- 
row keys that can also be used to move the cursor 
on the screen. Pressing ESC to enter the editing 
mode changes the cursor to an inverse " -h " to in- 
dicate editing mode. Additional commands are 
also available. ESC-R enters upper-case restrict 
mode, which allows only upper-case letters 
during keyboard entry except after typing a "", 
when both upper and lower case are allowed for 
PRINT statement. Typing another "" returns to 
upper-case only. ESC-T exits this mode. ESC-4 
displays a 40 column screen similar to the II + , 
while ESC-8 shifts to the new 80 column screen 
display. ESC CTRL-Q exits the new made entire- 
ly, returning to the old 40 column display, and 
turning off the 80 column card. 

A.3 

The New Display 

In order to maintain compatability with the 
old II and II -h , it was necessary to design a screen 
display that utilized the old screen memory 
($400-$7FF). This was insufficient for 80 column 
display, so Apple designed an 80 column card 
with its own memory mapped into the same ad- 
dresses. The hardware alternates its scans from 
one set of memory to the other when in 80 col- 
umn mode. Characters are stored alternating 
from one address to the next, with all the odd 
screen locations in main memory and all the even 
ones on the auxiliary card. 
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There are routines in the new monitor areas 
that can convert an 80 column screen to 40 by 
moving the alternate characters to the main board 
and throwing away the last 40 characters in each 
column. The opposite switch is accomplished by 
a similar move to the auxiliary card, using only 
the leftmost 40 columns for the characters 
previously on the screen. 

A.4 

Hardware Locations 

On the older Apples, the addresses 
$COOO-$C0OP were equivalent addresses and were 
only partly decoded by the hardware. This meant 
that reading any of those would yield the same 
result (reading the keyboard), which was also true 
of $C010-$C01F (clearing the keyboard strobe). 
These addresses are now fully decoded and pro- 
vide a set of soft switches/status indicators for 
the new 80 column card and extended 80 column 
card (with 64K memory expansion). 

The switches include options to read and/or 
write either the main board locations or the aux- 
iliary card locations, to set the standard zero page 
and system stack (main board) or the alternate 
zero page and system stack (auxiliary card), to 
turn on or off the $CXO0 ROMs, to enable or 
disable the 80 column display, and to turn on the 
normal or alternate character sets (normal has 
upper case flash instead of lower case inverse). 

Additionally, there are a group of locations 
that can be read to determine the current switch 
settings so that any program changing the 
switches can save the current settings and restore 
them at the end. States that can be determined in- 
clude READ /WRITE status, language card bank 
status, 80 column status, page status, and text 
mode. 

A.5 

Software Status 

Apple has always reserved some unused loca- 
tions in the text page RAM as scratch memory for 
the 7 hardware slots (1-71. Several of these loca- 
tions are now permanently assigned to the new 80 
column cards, when they are in use, and are used 
to store the cunent cursor location, I/O status, 
and BASL/BASH in Pascal. 

One particular location ($4FB) is the software 
MODE status. Each bit is indicative of the cur- 
rent state of operations: BASIC /Pascal, interrupts 
set/cleared, Pascal 1.0/1.1, normal /inverse 
video, GOTOXY in progress/not in progress, 
upper case restrict/literal mode, BASIC in- 
put/print, and ESC-R active/inactive. 



These locations enable a program to deter- 
mine the current state of the machine more easily 
than before, and make it simpler to utilize the 
new hardware configurations in programming. 

A.6 

Programming Considerations 

The standard Applesoft GET and INPUT (and 
associated monitor routine KEYIN) were not 
designed to work with an 80 column display and 
using them while in 80 column mode can cause 
loss of data or erasure of program in memory, but 
this can be overcome by a routine explained in 
Appendix E of the new Applesoft Tutorial. 
Reading the keyboard directly ($C000) functions 
the same as before. 

Do not assume an Apple //e or 80 column 
card when writing programs; one of the first 
routines should check for the type of machine be- 
ing used. Apple supplies a program that will do 
this on "The Applesoft Sampler"; and Call 
A.P.P.L.E. has also published a routine for this 
purpose. HTAB will not function beyond the 40th 
column. While POKE 36,POS works most of the 
time, Apple recommends POKE 1403,POS (0-79) 
for the //e. This routine will not work at all for 
an old Apple. 

It is the programmer's responsibilty to turn off 
the 80 column card at the end of a program. Do 
not quit the card with the cursor beyond the 39th 
column, as this can cause unpredictable results 
including program erasure. In case of accidently 
executing this command, pressing RETURN im- 
mediately will usually recover the cursor to the 
left margin. It is also necessary to turn the 80 col- 
umn card off before sending output to printers, 
modems, etc. 

VTAB no longer works when a window is set 
(by POKing 32,33 etc.). The solution is to VTAB 
to the location -1, and then do a PRINT prior to 
PRINTing the actual data. This causes the 
firmware to recognise the new VTAB location. 

These cautions are a small price to pay for the 
increased versatility and flexability of the new 
Apple //e. 



Editoi's Note: This mateiid is intended to 
be used in conjunction with the original 
version of What's Where in the Apple which 
did not contain Apple lie material. The 1984 
edition of WWA is now available for $19.95 
from your local bookstore, computer store, 
or by mail from MICRO, P.O. Box 6502, 
Chelmsford, MA 01824 (add $2 shipping) 
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MICRO 



No. 72 - June 1984 



MICRO SURVEY: JUNE 1984 

HELP YOURSELF! To keep MICRO in touch with the rapidly changing conriputer world so that we can give you the intornnation 
you need, please take a tew nninutes to fill in this questionnaire and nnall it back to us. THANK YOU for your tinne. 

DEMOGRAPHICS 

1. What is your age? 



-19 n 20-29 D 30-39 □ 40-49 O 50-59 □ 60-1- 



2. What is your occupation? 
D Programmer/analyst 
D Professor/teacher 
□ Business person 
D Other 



Engineer 
Lawyer 



Q Student 



D Technician 

D Doctor 

a Self Employed 



3. What is your formal educational level? 
D Fewer than 12 years n High school graduate 
D Advanced degree 

4. What is your annual household income before taxes? 
D Less than $20,000 D $20,000-29,999 D $30,000-39,999 

COMPUTER INFORMATION 

5. What mlcrocomputer(s) do you use? 

□ AIM D Apple II □ Atari (Model) 

D PET/CBM D SYM D VIC D TRS-80 Color Computer D Other 6502 
D Other computers/processors 



□ Associate degree D Bachelor's degree D Para-professional degree 



D $40,000-49,999 D $50,000 -f 



D Commodore 64 □ 



KIM D Macintosh D OSI (Model)N_ 
D Other 6809 



6. Where do you use the above computer(s)? 

D Home G Work D School D Other 

7. Approximately how much have you spent on your computer hardware so far? 

D -$500 D $500-999 D $1,000-1,999 □ $2,000-2,999 D $3,000-3,999 a $4,000-4,999 

8. Approximately how much do you expect to spend on your computer hardware in the next year? 

□ -$500 D $500-999 D $1,000-1,999 □ $2,000-2,999 D $3,000-3,999 □ $4,000-4,999 

9. What additions have you made to your basic system? 

□ Disk Drives D Modem D Serial Interface D Parallel Interface 
n Hard Disk D Graphics Tablet D Printer (type) 



n $5,000-9,999 
D $5,000-9,999 



D $10,000-1- 
a $10,000-1- 



D RAM cards D 6809 card D 68000 card D Z80 card 



10. What additional hardware changes or upgrades do you plan to make to your system? 
□ Disk Drives D Modem D Serial Interface D Parallel Interface D RAM cards 

D Hard Disk DGraphics Tablet D Printer (type) 

n Other hardware 



n 6809 card D 68000 card D Z80 card 



11. Have you ever constructed a computer, computer board, or major computer equipment? 
If yes, describe 



n Yes D No 



12. Have you switched from one computer to anottier? 
If yes, explain 



□ Yes D No 



13. Approximately how much have you spent on your computer software so far? 
D -$200 a $200-499 Q $500-999 D $1,000-1,999 D $2,000 -f^ 

14. Approximately how much do you expect to spend on computer software in the next year? 
n -$200 n $200-499 D $500-999 O $1,000-1,999 D $2,000 -^ 

15. How do you use your computer equipment? 

D Business D Software Development D Hardware Development D Telecommunications 
□ Hobby n Graphics □ Word Processing □ Database Management a Other 

16. What languages do you use? 

D BASIC D Pascal D Forth 
D 6502 Assembler 



D Entertainment D Education 



DC D COBOL D APL D LOGO 
D 6809 Assembler D 68000 Assembler D Other 



D LISP D Fortran 



0-2 


2-4 


4-8 


8-10 


More 


D 


D 


D 


D 


n 


D 


D 


D 


D 


n 


D 


D 


D 


n 


D 


D 


□ 


D 


n 


D 


n 


D 


D 


n 


D 


D 


a 


n 


D 


D 


D 


D 


n 


□ 


D 



17. In an average week, about how many hours do you spend on a microcomputer performing the following operations? 

Programming for fun or self-education 

Programming professionally 

Using packaged programs in business 

Using packaged programs at home 

Using packaged programs for education 

Playing games 

Other 

18. If you write programs, what type of programming do you spend most of your time developing? 
n Business applications D Games D Software development utilities D Other 

19. In an average month how much time do you spend with MICRO? 
D Less than 2 hours D 2-4 hours □ 4-8 hours D More than 8 hours 

20. How would you rate your present microcomputer knowledge? 
Software: D Elementary D Intermediate D Advanced 
Hardware: D Elementary D Intermediate Q Advanced 

Magazine Information 

21 . How long have you subscribed to or read MICRO? 
D Less than 6 months D 6 months to 1 year 



22. How did you get your current issue? 
D Subscription D Computer store 



D Over 1 year D Over 2 years D Over 3 years 
D Newsstand D Bookstore D Borrowed D Library 



n From the beginning 



23 To what other computer publications do you subscribe? 

D BYTE n Commander D Compute! D Creative Computing Q Dr. Dobbs Q In'Cider 
D Kilobaud Microcomputing D Nibble D Personal Computing □ Popular Computing □ RUN 
D 80 Micro D 68 Micro D Other(s) 



Softalk 



24. Please rate the following parts of MICRO as to their interest, with 6 being very interesting and 1 not at all interesting. 

5 4 3 2 1 
News a D D D D Advertisements Q D Q D □ Hardware & Software Catalogs 

Articles n D □ C D Columns n D D D D System specific information 



Reviews D D D D D 



Columns 
Editorials 



Q D D D D 
□ D D D n 



New Publications 



25 Please rate the following kinds of articles as to their interest, with 5 being very interesting and 1 not at all interesting. 



5 4 3 2 1 

Hardware tutorials 

Programming techniques O O D O D 

Utilities O O D D 



Applications 

Games 

News & Information 



D D 



26. Is MICRO O too technical O not technical enough O just right? 

27. What new areas would you liKe to have MICRO cover: 



D n 



Review articles 

Programs 

Languages 



5 

D 
O 



D D 



□ 



28. Do you l<ey in the longer programs published in MICRO? O Yes O No 

29. Would you be willing to pay extra to receive MICRO'S programs in diskette form? 

30. Overall, how do you feel about MICRO? How useful is MICRO to you? 



O Yes ONo 



Fold Here 



31. What are your favorite software packages in the following categories: 



Software Package 
Data Base Manager 
Word Processors 
Editor/Assembler 
Spread Sheet 
Monitor/Debugger 
Communications 

Other 

For the 



First Choice 



Second Choice 



Third Choice 



computer. 



Please feel free to write comments, suggestions and so forth on an additional page of paper and attach it to this form. 



Fold Here 



NO POSTAGE 

NECESSARY 

IF MAILED 

IN THE 

UNITED STATES 



BUSINESS REPLY CARD 

FIRST CLASS PERMIT NO. 60, CHELMSFORD, MA 



POSTAGE WILL BE PAID BY ADDRESSEE 

ilMCftO 

P.O. Box 6502 
Chelmsford, MA 01824 



Tape Here 
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Insidelthe cia 



by Ralph Tenny 



Last month we examined several programming modes 
on the 6526 CIA used for I/O on the Commodore 64. The 
shift register (SR) on the CIA was examined briefly, in that 
we learned to toggle the SR output (SP) by setting the 
mode to input (SP high) or output (SP low]. This toggle 
mode of operation is useful if you wish to output multiple 
bytes of parallel data on the eight Port B lines of U2 (User 
Port). That is, by using SPl (Ul), SP2 [U2), PA2 and PA3 
(U2) as clock strobes, eight bit values can be latched in 
four different latches as shown in Figure 1. Simply 
program all the port lines [PB0-PB7] as outputs, then load 
the port with the output data. Pulse one of the four strobe 
lines and the data will be transferred to the strobed latch. 

You should note a few things shown in Figure 1. First, 
all the 74LS374 latches are wired identically. Pin 11 is the 
Clock pin which causes the input data to be captured on 
the rising edge of the clock signal. Each clock line is driven 
from a different strobe output on the port, thus allowing 
different data to be saved in each latch. Pin 1 on each latch 
is the Output Enable line; these lines are all tied low to 
keep the latch permanently enabled | compare with Figure 
2) . Also note that output latches do not have to have tri- 
state outputs, but input latches (Figure 2) must be able to 
disconnect from the bus unless it is a dedicated input. 
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Figure 1. For 74LS374 latches selected by four unique 
strobes allows eight output lines to become the 32 
output lines. 



If you want to use the port for input instead of output. 
Figure 2 shows a tri-state latch connected for input. In this 
mode, the port must be programmed for input. Also, note 
that pin 1 (output enable) is separately controlled so the 
programmer can select one latch at a time to input from. 
The extemal hardware must load data into the latch by 
pulsing INLATCH, and it is wise to have some method of 
handshaking so the latch output doesn't change when the 
port tries to read the data. If four latches are attached, only 
one can be enabled at a time to avoid bus conflicts. If you 
use care in programming, it is possible to have (for 
example) two input and two output latches. This is what 
must happen: The input latches must be enabled only 
while they are being read, one at a time, and the port must 
be set for input. When outputting data, disable the output 
lines of the input latches, set the port for output, output 
the data, and clock the destination latch. If you want to go 
to extremes, one of the four output latches could be 
designated as a controller, enabling up to (for example) 
four inputs and fom outputs, or any combination of eight 
8-bit ports! 

The CIA serial port is not a UART or ACIA, and 
requires some understanding to use. If you want to 
commimicate with a computer, it is probably easier to 
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Figure 2. The 74LS374 latch can also be used for input if 
data is strobed in by external hardware and the output 
enable is controlled by the C-64 User Port. 
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write a software UART program which toggles a single line 
for output and receives on another line. The specific 
problems you will have using the SR for communication 
are: 

1. The SR outputs 8-bit words only - normal 
asynchronous commimication uses 10 bits minimum. 

2. The SR inputs only 8 bits, so incoming 
asynchronous data will be scrambled. In addition, reliable 
asynchronous input involves an input clock 16 times the 
data rate; the CIA Shift Register is a synchronous device 
which depends upon the external source to furnish a 
properly timed input clock, one pulse per bit. 

So, what is the SR good for? This port can be used as an 
I/O expander as shown in Figure 3. The output data from 
the SR becomes valid as the CNT line switches low, so the 
shift register used is positive-edge triggered and will accept 
data directly as shown. Also, the SR outputs the MSB 
(most significant bit) first, and assumes that incoming 
data has the same organization. If you use a negative-edge 
triggered shift register, the CNT line must be inverted. 
The shift registers used in Figure 3 are CD4015 CMOS 
parts, and are internally organized as two four-bit shift 
registers. Each successive section is cascaded with the 
previous one, and data is passed down the line. In order to 
output data to the circuit of Figure 3, the CIA SR is loaded 
with data for the output port B. This byte is shifted out; 
then, when the data for Port A is loaded, the Port B data is 
shifted into B and A's data is shifted into A. You need to 
realize that if the changing data will affect the external 
hardware, the scheme shown won't be acceptable. In that 
situation, the CD4094 is a four-bit register which allows 
data to be shifted in, then strobed onto the output lines 
when shifting is done. To use the SR for input, the external 
circuit must present data at the SR pin and then clock the 
CNT pin a short time later. 




Figure 3. Subject to the limitations discussed in the 
text, the CIA ShiftRegister section can be used as an 
output expander. 



A major advantage of the SR is that it can operate 
unattended in either polled or interrupt modes. Instead of 
using software timing loops to drive the serial port, the 
CIA uses Timer A in the free-running mode to drive the 
CNT pin and shift data out. After data has been 
transmitted or received, bit 3 of the Interrupt Control 
Register (ICR) is set high. If the CIA has been enabled for 
interrupt and the IRQ line is not masked, the processor 
will be interrupted. If you are outputting data, writing new 
data to the SR clears the interrupt bit and initiates the next 
transmission. Polled operation of the SR on input would 
require another CIA output line to be used for 
handshaking; otherwise it is possible to lose successive 
data bytes if the register isn't cleared in time. 

This is an abbreviated step-by-step procedure for using 
the Shift Register in the non-interrupt (polled) mode; 

1. Write $7F (127) to the ICR ($DDOD or 56589). This 
disables all interrupts from CIA 2 (U2] . 

2. Write $41 (65) for output mode or $01 for input 
mode to Control Register A ($DDOE or 56590). 

3. For output mode. Timer A must be enabled; this was 
accomplished as part of step 2. The maximum bit rate will 
be just faster than 250 kHz, which is set by writing 01 to 
the Timer A low byte and 00 to Timer A high byte, in that 
order. The Control Register setting (step 2) provided for 
continuous square wave output from the timer, so the SR 
will begin clocking data on the next rising edge from 
Timer A. 

4. Write a data byte to the Serial Data Register ($DDOC 
or 56588) to start sending data. Eight data bits will be 
shifted out, then Bit 3 in the ICR will be set. Poll this bit 
until it goes high, then load the next byte into the Data 
Register. 

Input operations consist of initializing the Shift 
Register and polling the SP bit in the ICR. Save the input 
data and poll again until all data is received. As mentioned 
above, some I/O line could be used as a status flag or 
handshake. 

All of our interface experiments so far have used either 
the C64 User Port, any RS-232 Serial Port, or the Radio 
Shack Color Computer printer port. All these computer 
inputs except the User Port are clumsy at best, leading to 
contrived or inefficient hardware. Expansion using the 
User Port is possible as discussed above, with little 
hardware penalty. The major tradeoffs are in operating 
speed and software overhead, especially for expansion 
beyond four 8-bit ports. One important advantage in using 
these ports is that it is relatively difficult to bomb your 
computer through these ports, compared to using the 
expansion ports. The expansion port on most appliance 
computers is unbuffered, which means a slip on your part 
can allow you to crater the microprocessor itself, killing 
your computer. 

Since our next type of expansion will deal with direct 
expansion from the microprocessor bus, we need to 
discuss ways to avoid damage to the computer. Unless 
specific machines are mentioned in the context of 
hardware design, comments in future columns and the 
remarks to follow will apply equally to the Color 
Computer, VIC-20 and C64. Many will be applicable to 
the Apple, and possibly to the Atari computers . However, I 
have no documentation on Atari, and Apple expansion 
using the Peripheral Connectors is a detailed and 
complicated process. 
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Successful interfacing to a microprocessor bus involves 
a detailed understanding of bus timing, bus drive 
capability and characteristics of the devices connected to 
the bus, I'll take it easy on the details, but there will be a 
lot of explanation which you need to follow. Figures 4 &. 5 
show the two major machine cycles of the 65xx 
microprocessor - one of this family is used in C-64, 
VIC-20, Apple and Atari computers. Note that these two 
cycles are almost identical, except for the phase of the 
R/W* (READ/WRITE NOT) waveform. In both cases, the 
action takes place during the last half of the cycle. Early in 
either cycle the Address lines come up with the memory 
address being accessed, and either READ (Figure 4) or 
WRITE* (Figure 5) comes true about the same time. In the 
READ cycle (Figure 4), data comes from the memory or 
peripheral (such as PIA or CIA) and must be available for a 
minimum of time T4. That is, the 65xx microprocessor is 
guaranteed to capture data available within that time 
frame. You would need to make such a study when 
choosing memory devices or designing hardware to use 
with the processor. Similarly, Figure 5 shows that the 
65xx processor is guaranteed to make data available for 
memory or peripherals no latei than T4 seconds after 
tADDRESS and R/W* comes true. These times are 
important when designing peripherals for the processor 
family. 



The other times shown in Figures 4 & 5 are: Tl - the 
maximum time required for ADDRESS and R/W* to come 
true; T2, T3 & T5 - the minimum time each signal will be 
available after the end of the current clock cycle (one full 
clock cycle shown). This kind of design study is called 
worst case design, because those times most likely to 
cause a circuit failure are chosen from the manufacturer's 
data sheets. 

The following table lists the times corresponding to the 
T times in Figures 4 & 5 for a processor clock rate of 1 
MHz. At 1 MHz, the machine cycle is one microsecond 
(1000 nSec] long. For slower clock speeds on a 1 MHz rated 
processor, the times will be approximately the same, 
which allows more time for the hardware to deliver or 
accept data. T-^ivip 



Figure 4 



Figure 5 



Tl 


225 nSec 


225 nSec 


T2 


30 nSec 


30 nSec 


T3 


30 nSec 


30 nSec 


T4 


650 nSec 


150 nSec 


T5 


10 nSec 


10 nSec 



It will be helpful if you keep this latter portion of this 
column handy for reference during future columns, since 
this basic information will be needed for reference as you 
read some future columns. 
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Figure 4. Timing for the 6502 READ machine cycle. See text for details of operation and clock speed. 





— 1_ 
















a'z r:LDCk 


./ 






iz — 










', 






R/U 












73 — 


I 












ftDDRESS 


X 




















TM- 


L "^^ "~ 










..-- 
.---' 




Dh7ih DJJ7 




















— -— 













Figure 5. Timing for the 6502 WRITE machine cycle. See text for details of operation and clock speed. 
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BusCaid n 

Commodore 64 



Name: 
System: 

Description; Allows any Commodore- 
compatible disk drive, including hard 
disk, and virtually any printer to be 
added to your system. Mix and match 
peripherals writh no fear of software 
incompatibility. BusCard is both 
hardware and software invisible. The 
cartridge mount allows cartridges to lie 
flat and device allocation switches 
remain in function mode at all times. 
BusCard gives the added power of 
extended BASIC as well as selectable 
conversion of Commodore code to 
standard ASCII. It comes with a full 
machine language monitor including 
assemble/disassemble commands. It 
just plugs in to install and comes with a 
one year warranty and documentation. 

Price: $200 

Contact; Batteries Included 

186 Queen St. West 

Toronto, Ontario M5v 

Izl Canada 

416/596-1405 




Name: BLAST (Blocked 

Asynchronous 
Transmission) 

System: Over 60 micros, etc. 

[not for Atari/Commodore) 

Description: Asynchronous 
communications software which 
allows any computer with BLAST to 
talk to any other computer with 
BLAST, using any asynch modems, or 
directly linked at speeds from 300 to 
19,200 baud. This package will already 
run on more than 60 micros, minis and 
mainframe systems. Unlike earlier 
asynchronous software, this provides 
truly bidirectional operation, allowing 
a system to receive one file, while 
simultaneously sending another. 
BLAST operates through common 
RS-232 serial ports and asynchronous 
modems, over dial-up lines or private 
networks, as well as from port to port. 
It is menu driven, supports unattended 
operation, permits user-defined 
function keys, etc. 

Price: $250 (for micros) 

Contact; Communications 
Research Group 
8939 Jefferson Hwy 
Baton Rouge, LA 70809 
504/923-0888 




Name: The Consultant 

System: Commodore computers 

Description; Formerly Delphi's 
ORACLE, this program lets you design 
a "layout" for any kind of information 
you want to file, then allows you to 
search, sort, and analyze information. 
The file structure offers expandable 
record size up to 9 display pages (7,000 
characters), with up to 99 fields per 
record. Any field may be a key-field, 
and a single field can be an entire 
screen of information. The number and 
overall size of the files is limited only 
by disk storage capacity. Sorting and 
searching is almost unlimited, 
including multiple-field and wild card 
in non-keyed fields. Full Four-function 
arithmetic is included. There is a 
password security system. Output 
functions include page numbering, 
printer control characters and optional 
line length. There are also built-in 
routines for mailing labels and forms. 

Price: $125 

Contact: Batteries Included 

186 Queen St. West 

Toronto, Ontario M5V 

IZl Canada 

416/596-1405 



Name: MasterFORTH 

System: Apple II/II + /He 
Language: FORTH 

Description: A complete professional 
programming language which includes 
a built in macro-assembler with local 
lables, a screen editor and a string 
handling package. The input and 
output streams are fully redirectable 
and make full use of the Apple DOS 3.3 
file system. Floating Point and HIRES 
options are also available. This meets 
all provisions of the Forth-83 
International Standard. 

The package includes FORTH 
Tools, a 200 page textbook, a technical 
reference manual, and a complete 
listing of the MasterFORTH nucleus. It 
gives the user a view of input and 
output from reading the input stream 
to writing a mailing list program. 
Numerous examples are provided. 

Price: $100-$ 160 
Contact: MicroMotion 

12077 Wilshire Blvd. Ste 

506 

Los Angeles, CA 90025 

213/821-4340 
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Name: The Print Shop 

System: Apple II + /Apple He 

Memory: 48K 

Hardware: Popular printers such as 
Epson, Imagewriter, 
Apple Dot Matrix, C.Itoh 

Description: Write, design, and print 
your own greeting cards, stationery, 
letterhead, signs and even banners. No 
special knowledge of graphics is 
required for this menu-driven software. 
With keyboard or joystick you can 
produce a finished piece in one of eight 
different typestyles, in two sizes and in 
solid, outline and three-dimensional 
formats. There are nine border designs, 
ten abstract patterns, and dozens of 
pictures and symbols with which to 
create, A built-in graphics editor allows 
you to create your own pictures or 
modify those provided. You can also 
print work generated with other 
graphics programs. 

Text-editing features such as 
automatic centering, left and right 
justification and proportional spacing 
give added help in design. Comes with 
a colorful assortment of pin-feed paper 
and matching envelopes, and a 
reference manual. 

Price: $49.95 

Contact; Broderbund Software 
17 Paul Drive 
San Rafael, CA 94903 

415/479-1170 



Name: Romar II(x) Computer 

Memory: 64K (expandable to 192K) 

Description: An Apple compatible 
computer with detached keyboard and 
dual capability featuring both Apple 
DOS and CP/M operating systems. 

Based on a 6502 with 64K ROM, 
expandable to 192K, plus a Z080 circuit 
card for running CP/M programs. The 
separate fully encodedkeyboard 
contains 87 keys, including both 
special function and numeric keypads 
with CAP LOCK and status keys. Built- 
in command software allows most keys 
to be pre-programmed for special 
functions. The design accommodates 
dual floppy disk drives and an 80 watt 
switching power supply. It contains 
eight expansion slots for Apple 
accessories and add-ons. 

The computer is designed to work 
with Apple programs and accessories 
without infringing on Apple proprietary 
circuitry or ROM. Besides operating 
with a variety of today's languages, it 
can adapt to future software languages. 



Ste 



Price: 


$695 


Contact: 


Romar Computer 




Systems 




22110 Clarendon St. 




103 




Woodland Hills, CA 




91367 




818/999-1083 




Name : Video * Clear Interference 

Cable 

System: Commodore, Radio 

Shack CoCo, any with 
TV monitor 

Description: An Interference Rejection 
Cable designed to reduce or eliminate 
radio frequency interference in 
television sets that are being used as 
monitors for home computers. It is 
easy to install, requires no 
modifications to either the computer or 
TV, and comes with all adapters 
necessary to interface with a wide 
variety of TVs. It contains a special RF 
filter that is designed to reduce the 
level of interference generated by the 
computer. The cable comes with 
90-day warranty. 

Price: $16.95 

Available: Computer Associates 

Box 683 

West Fargo, ND 58078 



Name: 
System: 



PerfectView 

Virtually All 



Description: Designed to fit virtually 
all terminals, this is an effective, 
simple and cost-efficient computer 
screen filter with circular polarization. 
It improves user comfort with glare 
reduction and contrast enhancement, 
cutting eyestrain and fatigue. It is 
lightweight and durable, anti-reflective 
coated polyester laminated to a circular 
polarizer. PerfectView is available in 
five screen sizes and mounts to the 
CRT housing with no tools. This is 
manufactured by Polaroid Corp. 

Price: $49.95 

Contact: PerfectData Corp. 

9174 Deering Avenue 
Chatsworth, CA 91311 
213/998-2400 
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Title: Miciocomputei Communications - A Window on 
the World 

Authors: Barbara E. McMullen and John F. McMullen 
Price: $14.95 
Publisher: Wiley Press 

Written in an easy, readable style, Microcomputer 
Communications is a guide for using your personal 
computer as a telecommunications tool, Methodology, 
equipment, and the process of information transmission is 
explained. It gives the essential information that is 
necessary for setting up telecommunications links 
between micros and such services as CompuServe, Dow 
Jones and other information somces. Telenet, Tymnet and 
Uninet telephone numbers for across the United States are 
also provided. 

Level: beginner to intermediate. 



Title: Engines of the Mind - A History of the Computer 
(haidbound) 

Author: Joel Shurkin 

Price: $17.50 

Publisher: W.W. Norton & Company 

This book presents a history of the computer from 'the 
mad genius of Charles Babbage and the remarkable 
Countess of Lovelace, through the invention of the first 
electronic all-purpose digital machine, to the creation of 
the chip and beyond.' 'Engines of the Mind' covers more 
than machines; it is really about people. Covering the 
various controversies involved in the creation of the 
computer, the history of the computer is painted in terms 
of humanity rather than a list of dates and events. 



Title: Experiments in Four Dimensions 

Author: David L. Heiserman 
Price: $17.50 
Publisher: Tab Books 

This is an introduction to fourth dimensional geometry 
and its applications. There are experiments that illustrate 
various theories and principles of one, two and three 
dimensions, as well as time, matter and space. The 
construction of four dimensional objects is explained 
through the plotting of lines, plane figures and space 
objects. Hyperspace objects, scaling and rotations in four 
dimensional space are also covered. There are ample 
drawings and examples throughout the text. Paper and 
pencil are the tools that are necessary; drawing the figures 
on your microcomputer is optional. For those with 
micros, a program is provided to enable you to draw and 
manipulate four dimensional objects. 

Level: intermediate to advanced. 



Title: Picture Perfect Programming in Applesoft BASIC 

Authors: Dr. Thomas Mason, Steve Payne, and Barbara 

Black 
Price: $14.95 
Publisher: Reston Publishing Company 

This book takes the approach that programming in 
BASIC can be learned more enjoyably through computer 
graphics than business or math problems. Requiring only 
basic math skills, the reader is guided through loops, 
subroutines, interactive programming, high resolution 
graphics, and business graphics. The basic premise the 
book is built on is that there are only two key concepts to 
mastering programming - loops and decomposition. 
These and all concepts are demonstrated visually, using 
the old adages - seeing is believing and a picture is worth 
a thousand words. 

Level: beginner. 



Title: Commodore 64 Graphics & Sound Programming 

Author: Stan Krute 
Price: $15.00 
Publisher: Tab Books 

Through various programs the reader is instructed in 
how to master the graphic and sound capabilities of the 
Commodore 64. Written in non-technical terms the 
programs use BASIC to produce effects that would require 
assembly language on other computers. A total of 68 
programs are included with many figures, charts and 
diagrams interspersed throughout the text. Taking a 
'learning by doing' approach, each chapter has a summary 
and exercises. Each chapter takes a similar format: a short 
introduction, programming example, detailed discussion 
of the example, suggestions for modifying the original, 
short review questions and several programming 
exercises. Answers and possible solutions to the problems 
are provided. 

Level; advanced beginner to intermediate. 



Title: The Microcomputer Users Handbook 1984 

Authors: Dennis Longley and Michael Shain 
Publisher: Wiley-lnterscience 

Written for a wide range of business people, this handbook 
address the problems of choosing and upgrading 
microcomputer systems. Divided into two parts, the first 
part explains what the role of microcomputers in business 
is, the right way to buy a computer system, maintenance 
and after sales support, planning for growth, project 
planning and staff participation and questions to be asked 
at a demonstration. The second part consists of over 200 
reviews of business micros and several hundred 
peripherals. The workings of a computer are explained, 
with most every related subject (languages, operating 
systems, telecommunications, etc.) being touched upon. 
There are plans for a yearly update of this handbook to 
keep material abreast with the market and industry. 

Level: beginner to advanced. 
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Recently I received a long letter from Paulo C, a reader 
in Mexico, requesting help from the other readers of 
Micro. The following is excerpted from this letter: 

"Approximately five months ago an archaeological team 
from the University of Mexico at Quihexl made a startling 
discovery while digging at the hase of a pyramid in 
Teotihuacan. As you may know, this site has long been 
regarded as an area rich in artifacts and relics. This 
particular expedition, headed by Drs. Jose Ferra and Juan 
Cortese sought to discover a burial chamber in the lower 
levels of the pyramids, in hopes of finding similarities to 
the pyramids at Giza, Egypt. 

After excavating an area 10' by 12' to a depth of 7', a 
solid stone table was struck. At first thought to be a fallen 
slab, it was soon realized that the stone was the top of an 
entrance way. Further digging revealed a wooden door, 
covered and sealed with gold panels. It was carefully 
examined by Drs. Ferra and Cortese and determined to be 
authentic. After being removed, the door was shipped to 
the Museum at Mexico City where it underwent carbon 14 
tests, its age -- the same as that of the Egyptian pyramids. 
Following removal of the door, the team worked to clear 
the passageway of dirt and rocks; at last entrance was 
gained. The inside walls were polished smooth and the 
floor was made of smaller stones, cut and laid cobblestone 
fashion. Travelling some 8 feet down the passageway 
another door, similar to the first, was found tightly sealed. 
This door was also removed and shipped back to the 
Museum where it underwent many tests, including a 
carbon 14 confirmation. Behind it, a wider corridor ran 
about ten feet, then turned sharply to the right and quickly 
narrowed. It is perhaps best to directly quote Dr. Cortese' s 
description of the next part of the expedition - 'There was 
much excitement as we walked around the comer of the 
corridor. When I saw that it narrowed I was particularly 
excited as this was the construction used in Giza 
preceding a staircase. So, I was not surprised to indeed find 
a staircase at the corridor's end. 

With great anticipation I slowly descended the steps, 
almost falling once as the generator faltered, momentarily 
flickering the lights. Could some angry, disturbed spirit be 
at work? I continued with Dr. Ferra close behind me. As 
we cautiously descended, we could hear a faint rustling, 
rushing noise, becoming louder the further we went. I 
shone my lantern down the stairs and, unexpectedly, it 
was reflected back. We reached the bottom to discover 
rushing water flowing over the last steps and filling the 
connecting passages within a few feet of the top. With the 
depth measured at over five feet, it was obviously too deep 
to negotiate without a boat, especially given the strength 
of the current. Alas, we had to resign ourselves to going 
back for the time being.' 

As the team wandered back up the stairs and returned 
to the campsite, it was decided that canoes would be the 
best solution to exploring the water-filled passageway, 
being light and easily maneuvered. Arrangements were 
made to have two canoes sent immediately by the 
University. Two days later, equipped with canoes, 
lanterns, photographic equipment and excavation tools 
the team once again descended the stairway. The canoes 
and equipment were carefully placed in the water, with 



Drs. Ferra and Cortese in the first canoe and two of their 
assistants following in the second. The rest of the team 
remained behind. Again Dr. Cortese comments, 'We 
carefully got in the canoes so as not to upset them and lose 
our equipment. Drifting with the current, we noted an end 
to the passageway some forty yards further on. As the 
current slowed near the end, an arch top became visable. 
Ducking our heads low, with a few good strokes of the 
paddles we were through the end and out the other side. It 
is so hard to describe moments like this. Dr. Ferra and I 
both gasped. We had found the burial chamber. The ceiling 
was quite high, particularly when you considered we were 
already elevated five feet by the water. As our assistants 
entered, their extra lanterns illuminated the chamber 
more clearly and they expressed equal astonishment. We 
were most impressed by what appeared to be a large altar 
rising up out of the water against one wall, being 
somewhat reminiscent of the old Catholic wall altars. 
Next to it, on the left, was a pedestal with a large falcon 
type bird carved out of what appeared to be black onyx. It 
looked very much like the Egyptian god Horns. On the 
altar top, leaning against the wall, was the most 
interesting object of all. A large, carved, circular stone; Dr. 
Ferra' s first impression was that of the Rosetta stone.' 

The two canoes returned, cameras filled with pictures 
of the chamber. The exploration and retrieval of the 
artifacts proceeded well, the wheel being removed and 
sent back to the Museum. It is still under investigation 
and being subjected to further testing. Underwater divers 
photographed a carving on the front of the altar. It depicts 
an ancient warrior who is sitting above an illuminated 
rectangular box. 

Unfortunately at this time there isn't any more 
information regarding the stone. After examining a 
drawing of this stone, I felt perhaps one of Micro's readers 
could possibly ascertain its hidden meaning. Included for 
you is a rendering of the stone's carvings." 

Well readers, good luck and please send any theories to 
me, as Micro would like to be able to contribute to, if not 
provide, the solution. We will acknowledge whoever is the 
first to solve, or lead to the solution of, this mystery. 
Thanks; if anyone can do it, I'm sure it will be one of you. 
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MICRO Program Listing Conventions 



Commodore 

LISTING 
Commands 

(CLEARj 

{HOME) 

(INSERT} 

(DOWN} 

CUP} 

(RIGHT) 

(LEFT) 

Colors 

( BLACK, > 

(WHITE) 

(RED) 

(CYN) 

(PURPLE) 

(GREEN) 

(BLUE) 

(YELLOW) 

(RVS) 

(RVSOFF) 

(ORANGE) 
(BROWN) 
(GREY n 
(GREY 1) 
((jREY 2) 
(LT GREEN 1 
(LV BLUE) 
(GREY 3) 

Functions 

(Fl } 
(F2) 
(F3} 
{F4) 
(F5} 
{F6) 
(F71 
(FS) 



C64 KEYBOARD 



3 
M 

II 



I 

a 

n 



;3 

II 
:3 



" CLR 
HOME 
■ INST 
CRSR D(3WN 
" CRSR UP 
CRSR RIGHT 
" CRSR LEFT 



CTRL 
CTRL 
CTRL 
CTRL 
CTRL 
CTRL 
CTRL 
CTRL 
CTRL 
CTRL 

= 1 

3 
4 
5 
6 
7 



■ n 

n '■ +2 

II f5 

U " it 

II n 



Special Characters 



BLK 
WHT 
RED 
CYN 
PUR 
GRN 
BLU 
YEL 
RVS 
RVS 



( P I } 
{POUND} 
tUP ARROW) 



" Pi Char 
Pound Sign 
Up Arrow 



ON 
OFF 



Atari 






ConventioRE used in ATARI List 


inqs. 


Hornial Alphanuaeric appear as 


UPPER CASE: 


SAHPLE 






Reversed Alphar 


uaenc appear as lower case: | 


yES (y is 


reversed) 




Special Control 


Characters in 


quotes appear as; 


tcoBsand} 


as follows: 




Listing 


CoAieand 


ATARI Keys 


{ijp} 


Cursor Up 


♦ ESC /CTRL - 


mm} 


Cursor Down 


♦ ESC/CTRL = 


(LEFT} 


Cursor Lett 


<- ESC /CTRL + 


(RISHT) 


Cursor Right 


■*■ E3C/CTRL * 


(CLEAR) 


Clear Screen 


fi ESC/CLEAR 


(BACH:} 


Back Space 


A E3C/BACK 3 


(TAB) 


Cursor to Tab 


► ESC/TAB 


(DELETE LINE) 


Celete Line 


Q ESC/SHIFT DELETE 


(INSERT LINE) 


Insert Line 


□ ESC/SHIFT INSERT 


(CLEAR TAB) 


Clear Tab Stop 


B ESC /CTRL TAB 


(SET TAB) 


Set Tab Stop 


Q ESC/SHIFT TAB 


(BEEP) 


Beep Speaker 


□ ESC/CTRL 2 


(DELETE) 


Delete Char. 


U ESC/CTRL BACK S 


(INSERT) 


Insert Char. 


U ESC/CTRL INSERT 


{CTRL A) 


Graphic Char. 


h CTRL A 




where ft is any 


Graphic Letter Key 



Non- Keyboard Commands 



(DIS=) 
tENB») 

(LOWER CASE) 
(UPPER CASE) 
{ "RETURN} 
(DE;L) 
(SPACED 

Notes! 



CHR*(8» 
CHR* ' '^i 
CHR*( 14) 
CHR*(M2) 
CHR*( 142) 
CHR*(20) 
CHRl(l60) 



(BACK ARROWIt- Back Arrow 



1. '^ represents SHIFT KEY 

2. " represents Commodore Key m 
lower leH corner of keyboard 

3. CTRL represents CFRL Kev 

4. Graphics characters represented 
in Listing by keystrokes required 
to generate the character' 

5. A number directly after a (SyNbOL, 
indicates multiples o + t ti e :■: y M ti L ; 
{D0WN6) would mean DOWN t tiines 
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More Fun 
Than The 

French Foreign Legion 

Join the elite corps of autliors— Join IV1ICR0! 

We are iooking for a few good writers who have 
what it takes: 

• a technical understanding of computers 

• innovative techniques and progranns 

• good writing skills 

• a desire to" participate in an exciting and 
growing field 

• the ability to take old ideas beyond 
themselves 

• the willingness to contribute and make a 
difference. 

Don't wait-send for your Writer's Guide today. 

Send a S.A.S.E. to: 

Mike Rowe 

MICRO INK 

P.O. Box 6502 

Chelmsford, MA 01824 



=}BC 



^IBE 



ElBE 



SEE 



SEE 



SHE 



3E1E 



Next Month In MICRO 



Features 

The Dvoralc — A look at the alternative to the 
3 standard QWERTY keyboard, one which can 
speed up your typing unbelieveably. 

Compression — This professional quality 
Applesoft program will save large amounts of 
storage space by eliminating unnecessary data 

f and redundancies. 

HiRes Printer Dump — The beginning of a three- 
^ part series on dumping graphics from the 
Commodore 64. 

s Flight Simulator — An in-depth look at the new 
Flight Simulator II program for armchair pilots 
which includes a WW I! dogfight, as well as 
realistic instruction in flying a Piper. 



Hilister — The first of a two-part series covers 
the highlighting of text within a program for 5 
emphasis. Part 2 will cover moving around within 
a program listing. 

Commodore to Apple Cassette — Transfer files 
from Commodore to Apple and learn, in detail, 
how the Commodore tape is generated. 

Plus More... 



Departments 

Reviews in Brief 
Software/Hardware Catalogs 
New Publications 
Interface Clinic 



HE 



ElEE 



DEE 



3BE 



EIQE 



3HE 



ElEE 



3BE 
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This famous book now contains the most comprehensive description of firmware 
and hardware ever published for the whole Apple II family. A new section with 
guide, atlas and gazeteer now provides Apple lie specific information. 



• Gives names and locations of various Monitor, 
DOS, Integer BASIC and Applesoft routines and 
tells what they're used for 

• Lists Peeks, Pokes and Calls in over 2000 
memory locations 



• Allows easy movement between BASIC and 
Machine Language 

• Explains how to use the information for easier, 
better, faster software writing 



This expanded edition is available at the new low price of only $1 9.95 

For the 35,000 people who already own previous editions, 
the lie Appendix is available separately for just $5.00. 



Please send me: 

What's Where in the Apple @ $19.95 ea. 



(Plus $2.00 per copy shipping/handling) 

Apple He Appendix @ $5.00 ea. 

(Includes shipping charges) 

Mass residents add 5% sales tax $ 



Total Enclosed $ 

For faster service 
Phone 617/256-3649 



Name 



Address 



city 
Signature . 



Acct # . 



State 



Zip 



D Check D VISA 



D MasterCard 



Expires. 



MICRO, P.O. Box 6502, Chelmsford, MA 01824 
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ATARI COMPUTER OWNERS: 



Pick the positively 
perfect, practical, 

printer-port peripheral 
package, from 

PERCOM DATA! 




That's nghi ihe positively perfect PERCOM DATA SW, floppy disk drive with a BUILT-IN 

PRINTER-PORT for your Atarr* 400^800 Is now available! 

Until now, Atari computer owners who wanted to hook a printer to their computer had only one 

choice . , spend atxiut S220 for an interface device. THOSE DAYS ARE OVER. PERCOM DATA has 

built a parallel phnter-port right into its new AT88 PD model. Now you can add a quality disk drive 

system AND have a place to plug in a printer, . WITHOUT BUYING an interface. 

The AT88 SI PD™ disk drive operates in both single density (88K bytes formatted) and double 

density (176K bytes formatted) 
What more could you want? NO INTERFACE , a high quality PERCOM DATA disk drive,- AND a 
built-in PRINTER-PORT, all with a price of $599. 
Pick up a positively perfect PERCOM DATA disk drive, with 
printer-port prontol 
For Ihe name of an authorized PERCOM DATA Dealer near you, 
call ouf TOLL-FREE HOTLINE 1-800-527-1222 NOW, or write 
for more information 



Perfectly Pricett 

$599. 



PERQOM QATA 



CORPORATION 



E xpanding Your Peripheral Visio n 

DRIVES * NETWORKS ' SOFTWARE 

11220 Pagemili Road. Dallas. Texas 75243 (214) 340-5800 

1-800-527-1222 

Atari IS a regislered trademark of Atari, Inc • ATSB S 1 PO is a Irademafk of Percom Data Corporation. • COPYRIGHT PERCOM DATA CORPORATION 1983. 

Prices subiecl !o change without notice. 



J 



